Perl, actions sur fichier

Résolu
Kharec Messages postés 4146 Date d'inscription   Statut Contributeur Dernière intervention   -  
Kharec Messages postés 4146 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour à tous! Voilà mon souci. Je voulais savoir (en perl) comment lire une ligne dans un fichier, l'afficher, la modifier ou en rajouter une autre...
Par exemple:

J'ai un fichier test.txt dans mon /home/kharec. Il contient les lignes:

Ceci
est
un
test

Comment écrire le script qui:

0 - Lira cette ligne.
1 - Affichera la ligne 3
2 - Copiera la ligne 3 dans un autre fichier.
3 - Ajoutera une cinquième ligne qui dirait par exemple "Fin du fichier".

Merci de votre aide!
A voir également:

2 réponses

lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,

Je vais te donner quelques indications et ensuite tu nous montrera ce que tu as essayé

1.
- utilise l'opérateur <> sur un fichier passer en argument
- <LIRE> sur un handle de fichier LIRE

2.
- utilise la variable prédéfinie $.
- lance un compteur $ligne++ pour compter les lignes parcourues

3.
- ouvre un handle en écriture ou ajout et quand le compteur est à 3 ou $. égal 3 fait un print HANDLE

4.
- ouvre un handle de fichier en mode ajout et écrit la ligne (elle sera écrite à la fin de fichier).
- pour écrire la ligne dans un endroit précis il y a plusieurs possibilités :
a. utilisation d'un fichier temporaire
b. stocker le fichier dans un tableau et ajouter un nouvel élément à la position désirée
etc.

0
Kharec Messages postés 4146 Date d'inscription   Statut Contributeur Dernière intervention   510
 
Merci beaucoup! Je crois avoir une idée, je vous la posterai =)
0