Bonjour
J'essaie de faire un petit programme simple et j'ai pleins de message d'erreur
C'est supposé réafficher le tableau. J'y arrive tant que cela n'est pas un Sub
Mais depuis que j'ai découpé pour y inclure le sub {test} plus rien ne fonctionne
Merci d'avance pôur votre aide
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
17
18
19
20
21
22
23
24
25 use warnings; #use strict; my @LeFiltre= ( ["0", "a" ], ["1", "b" ], ["2", "c" ], ["3", "d" ], ["4", "e" ], ["5", "f" ], ["6", "g" ], ["7", "h" ], ["8", "i" ], ["9", "j" ]); &test(@LeFiltre); &test(@LeFiltre); sub test{ # my @MonFiltre = @LeFiltre; my $MonFiltre=$_[0]; for ($i=0;$i<10;$i++){ print "Coordonnees $MonFiltre[$i][0] "; print " $MonFiltre[$i][1]\n"; } }
Partager