Comment lire un fichier ligne à ligne en commençant par la fin ?

Bonjour,

J'aimerai savoir s'il est possible de lire un fichier ligne par ligne en commençant par la fin de ce fichier puis en remontant jusqu'au début ? en considérant que le fichier est "gros".

Merci d'avance.

Bonjour,

Oui c'est possible grâce au module File::ReadBackwards.

Pfff... jamais j'aurais imaginé qu'un fou ait pu inviter un tel module. Je suis toujours frappé par l'étendue du CPAN...

Dictionnaire :
- CPAN : un Univers à lui tout seul

Citation:

---

Envoyé par Philou67430

Pfff... jamais j'aurais imaginé qu'un fou ait pu inviter un tel module. Je suis toujours frappé par l'étendue du CPAN...

Dictionnaire :
- CPAN : un Univers à lui tout seul

---

:aie:. Je l'ai déjà utilisé et il m'a été d'une très grande utilité car j'avais besoin d'analyser un fichier de plusieurs Go et les informations intéressantes se situées dans les trois dernières lignes du fichier ;) !

Vive le CPAN :D !

Est-ce qu'il serai possible de le faire sans utiliser de module ?

Sûrement, en utilisant les fonctions d'accès aux fichiers de bas niveau, mais je ne te conseille pas d'essayer.

Utilise le module ou, à la riogueur, pompe son contenu.

L'intérêt et la grande force de Perl est le nombre de modules dans le CPAN. S'en priver est vraiment regrettable surtout quand ils sont très efficaces.

J'aimerai donc "pomper son contenu".

J'enregistre donc le fichier suivant : http://cpansearch.perl.org/src/URI/F...adBackwards.pm

indépendamment de mon script pour éviter de le surcharger.

Mais comment l'utiliser à l’intérieur de mon script ? car le 'use File:ReadBackwards' ne fonctionne donc pas.

Copie le module dans un répertoire nommé File au même niveau que ton script.
Ajoute dans ton script :

Code:

---

1 2 3

use lib qw(.); use File::ReadBackwards;

---

Mais la solution de l'installation standard est certes la plus fiable.