salut tous,

bon voila je n'arrive pas a corriger une erreur qui me vaut un "out of memory!" de la part de perl.
voila le warning qu'il me balance :
Use of uninitialized value in string ne at subpa2xpkprot.pl line 329, <XPKIN> line 732.

cette ligne ce trouve dans une petite fonction :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
sub cherche
{
	my($numero,$atome) = @_;
	$m=0;
	while($TdT[$m][4] != $numero) { $m++;}
	while($TdT[$m][3] ne $atome) { $m++;}   <--- ICI
	return($m);
}
j'ai beau chercher, mes deux string $TdT[$m][3] et $atome ne sont jamais vides....

je precise que @TdT est un tableau de tableau qui stocke un fichier de 100ko, je pense pas que ce soit grand chose pour les pc d'aujoud'hui ?

je precise aussi <XPKIN> est un fichier de 500ko que je traite ligne par ligne.

MERCI d'avance de vos reponses