Re: problème de pipe

Top Page

Reply to this message
Author: anne aublanc
Date:  
To: ML Guilde
Subject: Re: problème de pipe

| Ben j'en vois 2:
|
| $ perl faxviamail.pl /tmp/repfaxz/titio 2>&1 | perl faxviamail_log.pl
| (en modifiant le 2nd pour qu'il lise à partir de stdin)
|
| $ perl faxviamail.pl /tmp/repfaxz/titio 1>/tmp/logrepfax 2>&1; perl \
| faxviamail_log.pl /tmp/logrepfax
|


merci pour vos réponses...

J'avais juste un ti souci avec le pipe...

Je pensais qu'il me donnait un nom de fichier... pas toutes les lignes de stdin...
J'ai corrigé dans le deuxième pgm..

au lieu de
my $filemsg = shift;

avec ces petites lignes  cela marrche mieux!
my $message  = do { local $/; <> } or die  print "erreur de fichier\n";
my $filemsg = "/tmp/logrepfax.txt";
if (open(AJOUT, ">$filemsg") ) {
    print AJOUT "$message\n";
    close AJOUT;
}


et plus de pb!
Encore une énormité de ma part!

merci
anne