bonjour je commence le perl et je ne comprend pas ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
#/usr/bin/perl
 
print "Des listes et des boucles !\n";
 
@tablo = (1, 2, 3, "foo", 4, "bar");
 
foreach $case (@tablo){
 
	print $case."\t";
}
 
print "\nEt si je veux la 4ème valeur du tableau ?\n";
print "La 4ème valeur du tableau est $tablo[3]\n";
je comprend pas le
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
foreach $case (@tablo){
 
	print $case."\t";
}
passke la variable #case n'existe pas
quelqu'un peut m'aidez svp ? merci