17 lines
266 B
Plaintext
17 lines
266 B
Plaintext
|
#!/usr/bin/perl
|
|||
|
|
# Tableaux
|
|||
|
|
@tab1 = ("lu", "ma", "me");
|
|||
|
|
@tab2 = @tab1[1,2];
|
|||
|
|
@tab2 = @tab1;
|
|||
|
|
print $tab[0];
|
|||
|
|
print $#tab1; # $# = index du dernier élément
|
|||
|
|
$tab1[3] = "Je";
|
|||
|
|
$tab1[30] = "Mon Langage Perl";
|
|||
|
|
|
|||
|
|
$#tab $_
|
|||
|
|
|
|||
|
|
@ARGV
|
|||
|
|
|
|||
|
|
$ARGV[0] # Le premier argument saisi
|
|||
|
|
$#ARGV
|