DESS TIMH

B.Fermeture

Commande close
close FENT; close FSOR;

Introduction au langage Perl

3. Lecture

$ligne = <FENT>;
ex:$reponse = <STDIN>;

=> lecture d'une ligne à l'écran

Remarque:
- La fin de ligne (retour-chariot) est lue également. Pour enlever cette fin de ligne il suffit d'utiliser
la commande chop, ou son équivalent : chomp(enlève le dernier caractère uniquement si c'est un
retour-chariot)
- On peut lire toutes les lignes d'un fichier dans un tableau (en une seule instruction)
@lignes = <FENT>;

4. Ecriture
   
   print Fsor ce-que-je-veux;

print FSOR 'DUPONT Jean';
print FMAIL 'Comment fait-on pour se connecter SVP ?';
print STDOUT "Bonjour\n";
print STDERR 'Je déteste les oranges !';

5. Parcours

6. Fichier spécial : <>
   
   Perl offre une fonctionnalité bien pratique : l'utilisation d'un fichier spécial en lecture qui
   contiendra ce qui est lu en entrée standard.

Remarque: Lorsque, dans une boucle « while », on ne spécifie pas dans quelle variable on lit le
fichier : la ligne lue se trouvera dans la variale spéciale « $_».

Ainsi ce programme demandera d'écrire quelques lignes et affichera le nombre de lignes
qu'il a lues. Mais il permet également de prendre un ou plusieurs fichiers en paramètre.
(voir chapitre Passages de paramètres au programme page 24)

http://www.med.univ-rennes1.fr/~poulique/cours/perl/

Page 18