Partie 1 - Etape 1 - Exercice 3

a. parcours d'une liste
Récupérer le programme suivant,
essayer de l'exécuter, si nécessaire corriger et compléter.
------------------------------------------
#!/usr/bin/perl -w
@liste1 = (lundi mardi mercredi jeudi vendredi samedi dimanche);
print "affichage global :\n";
print @liste1,"\n";
print "@liste1\n";
print "taille de \@liste1 = (à compléter...) \n";
print "son dernier élément est : (à compléter...)\n";

print "affichage de \@liste1, élément par élément :\n";

print "\navec une boucle foreach :\n";
(à compléter...)

Script:

Commande : 

Résultat:  

Commentaires : On fait un chmod -x pour rendre le fichier exécutable

b. manipulations de listes
Récupérer le programme suivant.
Commenter les différentes instructions, et prévoir très précisément les affichages avant d'expérimenter
-----------------------------------------
#!/usr/bin/perl -w
@alpha = ('a'..'z'); @liste = (@alpha,0..9);
$el = $liste[3];
print "$el\n";
($a, $b, $c, @reste) = @liste ;
print "\$a= $a, \$b= $b, \$c =$c , \@reste= @reste\n";
($b, $a)= ($a, $b);
print "\$a= $a, \$b= $b \n";
$el = pop @liste;
print "\$el= $el, \@liste= @liste\n";
$el = shift @liste;
print "\$el= $el, \@liste= @liste\n";
print "\@alpha est la liste \n@alpha\n";
for ($i=0; $i<26 ; $i++) {
$el= pop @alpha;
unshift @alpha, $el;
}
print "\@alpha est maintenant \n@alpha\n";

Script : 

Commande :  

Résultat:         

Commentaires :  L