Bonjour,
Je débute en Perl et j'ai un problème sur la gestion de tableau.
Voici mon problème : j'extrais des informations d'un fichier grâce à des regex et je les stockent dans un tableau. Lorsque j'affiche les éléments du tableau un a un je les obtiens, mais lorsque je demande la taille du tableau celle ci est nulle.
Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
use constant ID => 0;
use constant NOM => 1;
use constant PRENOM => 2;
 
 
my @templine;
my $taille;
 while(<FILE>){
	($tempLigne[ID]) = ($_ =~ m/identifiant:(\d+)/);
	($templigne[NOM]) = ($_ =~ m/nom:(\w)/);
	($templigne[PRENOM]) = ($_ =~ m/prenom:(\w)/);
	printf("%d, %d, %d \n",$tempLigne[ID] ,$templigne[NOM], $templigne[PRENOM]);
	$taille = @tempLine;
	printf("taille tableau : %d\n", $taille);
}
j'obtiens des chose du genre
22831, DEPP, JOHNY
taille tableau : 0
88731, PAGE, JIMMY
taille tableau : 0
....

J’espère que j'ai énoncé clairement mon problème
Merci de vos réponses !