{filelink=14100}

#!C:/perl/bin

#@tab = qw# dino fred barney #;

@tab = qw"Perl et Python même logique";
print "1:#","@tab","n";

$pl = shift(@tab);      # $p contient "Perl",
print "2:#",$pl,"n";;
print "2-1:#","@tab","n";       #@tab contient maintenant (et Python même logique)

$et = shift(@tab);      # $et contient "et",
print "3:#",$et,"n";;
print "3-1:#","@tab","n";       #@tab contient maintenant (Python même logique)

$py = shift @tab;       # $py contient "python"
print "4:#",$py,"n";
print "4-1:#","@tab","n";        #@tab contient maintenant (même logique)

#Sauter la valeur 'même
shift @tab;
print "5:#","@tab","n";       #@tab contient maintenant (logique)

$lg = shift @tab;       # $lg contient "logique"
print "6:#",$lg,"n";
print "6-1:#","@tab","n";        #@tab est vide

#Ajout des éléments dans la liste
unshift(@tab, "Java");      # @tab contient maintenant (Java)
unshift @tab, "et C#";      # @tab contient maintenant (Java et C#)

@lst_m = 1..9;
unshift @tab, @lst_m; # @tab contient maintenant (1 2 3 4 5 6 7 8 9 et C# Java)
print "@tab";

Livres sur ce sujet

[amazon_image id=”2841773698″ link=”true” target=”_blank” size=”medium” ]De l’art de programmer en Perl[/amazon_image][amazon_image id=”2914010729″ link=”true” target=”_blank” size=”medium” ]Perl pour l’impatient[/amazon_image][amazon_image id=”2841771407″ link=”true” target=”_blank” size=”medium” ]Programmation en Perl, 3ème édition[/amazon_image][amazon_image id=”B005ELPHNA” link=”true” target=”_blank” size=”medium” ]Perl moderne: L’essentiel des pratiques actuelles[/amazon_image][amazon_image id=”2914010656″ link=”true” target=”_blank” size=”medium” ]Les expressions régulières par l’exemple[/amazon_image][amazon_image id=”2914010869″ link=”true” target=”_blank” size=”medium” ]Les meilleures bibliothèques pour Perl[/amazon_image]