Programmation pour le T.A.L. avec Perl

++ Partie 02
++ Étape 01 : Introduction
++ Exercice 04 : Boucle de lecture while

Le programme ci–dessous permet de saisir des lignes au clavier dans une boucle while (Tant que) avec l’opérateur ‹›. La fin de la saisie est provoquée par l’envoi du caractère obtenu par la combinaison des touches Ctrl+D (eof) sur une ligne vide.



On explique le script puis on le teste.

Fichier contenant le programme : Cliquer ici pour le visualiser.

Commande :

Résultat :

L’affichage est identique à la saisie car le fichier spécial ‹› contient ce qui est lu en entrée standard (Le clavier).



On réécrit le programme précédant en n’utilisant que la variable spéciale $_ (Contient la dernière ligne lue).

Fichier contenant le programme : Cliquer ici pour le visualiser.

Commande :

Résultat :