Variable inéxistante :x

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

Code:

---

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:

---

1 2 3 4

foreach $case (@tablo){   print $case."\t"; }

---

passke la variable #case n'existe pas :x
quelqu'un peut m'aidez svp ? merci

Citation:

---

Envoyé par frees3x

...
passke la variable #case n'existe pas :x
quelqu'un peut m'aidez svp ? merci

---

Ce code fonctionne pourtant. :)

En fait, la variable $case (pas #case) est la variable de boucle. Le fait de l'indiquer au foreach va la créer, et le foreach lui donnera successivement toutes les valeurs prises dans la liste @tablo.

Bonne continuation, et bienvenue à Perl. ;)

ahhh okééé donc je peut l'appellez comme je veut puisqu'il va la creer
ce n'est pas du tout le cas dans le php de creer des variables comme ca si ?
merci je progresse :)

Grillé, et de pas mal de foix en plus !
Ca m'apprendra à laisser une fenêtre ouverte pendant trente plombe sans y toucher :P
Pour info, $case vaut chaque valeur de ton tableau une par une, c'est à dire 1, puis 2, puis 3, puis "foo", puis 4 et enfin "bar".