17 lines
266 B
Perl
Executable File
17 lines
266 B
Perl
Executable File
#!/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
|