Cours langage de programmation Perl, tutoriel & guide de travaux pratiques en pdf.

Les fichiers : ouverture

En lecture :la fonction open permet d’ouvrir un fichier et prend en paramètre un descripteur (l’objet permettant de manipuler le fichier) et le nom du fichier.
Format :
fonction d’ouverture descripteur du fichier nom du fichier
En écriture :il faut ajouter le symbole ‘>’devant le nom du fichier. Si le fichier existe, son contenu sera écrasé. En mode d’ajout, on utilise le symbole ‘>>’. Si le fichier n’existe pas, il sera créé.
ouverture en écriture (>> : mode d’ajout)
open (DESC , ‘fichier’);
open (DESC , ‘> fichier’);

Les fichiers : ouverture / fermeture

Gestion d’erreurs : Lorsqu’on ouvre un fichier, il se peut qu’il y ait une erreur. En lecture: le fichier n’existe pas ou ne peut pas être lu. En écriture: le fichier existe, mais on n’a pas le droit d’y écrire.
La fonction die permet d’afficher un message et d’arrêter le programme.
La variable $!Contient le message d’erreur système. On peut aussi afficher son contenu.
La fermeture du fichier s’effectue avec la fonction close. exemple : close(DESC);
if ( ! open (DESC , ‘> fichier’) ) { die « Problème à l’ouverture : $! »; }
open (DESC , ‘> fichier’) || die « problème à l’ouverture : $! »;

Les fichiers : lecture / écriture

La lecture dans un fichier se fait par ligne.
On peut aussi lire tout le fichier et le placer dans un tableau. À chaque indice du tableau, il y aura une ligne du fichier.
L’écriture dans un fichier est encore plus simple. Il suffit de spécifier le descripteur du fichier àl’utilisation du print.
while($ligne = ) { print$ligne ; }
@ligne = ;
printDESC  » allo le monde  » ;