--stdout un peu particulier

Bonsoir,

Après quelques recherches, je ne vois pas bien comment procéder, voici mon souhait :

J'exécute mon script, un simple extracteur de ligne d'un fichier, et j'aimerai travailler directement sur la sortie.
Je m'explique, le script s'appelle extract_char.pl :

Code:

---

perl extract_char.pl -e /home/tiger-222/fichier.txt

---

Ce code renverra dans la console toutes les lignes du fichier (grâce à l'option -e).

Une autre option me permettrait de travailler sur cette ligne pour faire tout un tas de choses (-t).

Ce que je souhaites donc :

Code:

---

perl extract_char.pl -e /home/tiger-222/fichier.txt --stdout | perl extract_char.pl -t -

---

Ce qui se passerait, c'est que chaque ligne sera envoyée dans stdout et récupérée directement par un autre appel de ce même script en spécifiant "-" après l'option -t (ou utre, ça n'a aucune importance).

Je n'ai aucun code à montrer puisqu'il s'agit d'un scénario pour illustrer la chose.

D'où mes questions :
1. Comment rediriger toute information vers stdout (en spécifiant une option telle que --stdout par exemple) ?
2. Comment récupérer dans un second temps ce que le script renverra dans stdout ?
À savoir qu'il ne faut pas attendre que la première occurrence du script s'achève pour commencer la 2ème, imaginons un fichiers de plusieurs gigas ce qui prendra un certain temps.

Une idée ?

Merci d'avance :ccool:

Mmmm... j'avoue ne pas bien comprendre, et ne connaissant pas ton niveau en perl, j'ai du mal à te donner des conseils.

Cela dit, print "toto" écrit simplement sur stdout.
Donc si
extract_char.pl contient des print, ils seront envoyés sur stdout.

Tu peux donc écrire naturellement quelque chose comme

Citation:

---

perl extract_char.pl </home/tiger-222/fichier.txt | perl extract_char.pl -autres-options > /home/tiger-222/fichier_traite.txt

---

Merci d'avoir pris le temps de répondre.

Je ne suis pas débutant en perl, j'ai de bonnes bases.
Je me suis mal exprimé, je vais rééssayer avec un exemple plus parlant, presque mon cas.

Imaginons deux programmes en perl. L'un est un générateur de mots, l'autre un un chiffreur.
Soient gen_mot.pl et chiffre_mot.pl.

Je génère des mots, la longueur du mot est de 5 caractères disons :

Code:

---

perl gen_mot.pl 5

---

De l'autre côté je désire chiffrer un mot quelconque :

Code:

---

perl ciffre_mot.pl mot

---

Ce que j'ai en tête : le générateur créer ses mots et le chiffreur les récupère directement :

Code:

---

perl gen_mot.pl 5 | perl chiffre_mot.pl -

---

Où "-" voudrait dire : je récupère ce que gen_mot.pl m'envoie.

Qu'en penses-tu ?

J'en pense que si tu travailles avec un shell de type bash, tu as tout intérêt à regarder du coté de xargs :

Code:

---

perl gen_mot.pl 5 | xargs -n 1 perl chiffre_mot.pl

---

Autre alternative :
Dans chiffre_mot.pl, si @ARGV est vide, boucle sur <STDIN> au lieu de @ARGV.

J'opte pour xargs, ç'est pratique comme tout !

Merci Philou67430 :D

Unix/POSIX est plein de ressource.
Néanmoins, ne perd pas de vue le traitement sur l'entrée standard, c'est qu'en même plus pratique pour faire des pipelines (puisque cela fonctionnera sur un système qui ne possède pas xargs, comme windows).

Oui je l'ai mis en place aussi pour tester. :ccool: