Perl et Signaux : Broken Pipe

Citation:

Envoyé par MarneusCalgarXP

Je procédais ainsi:

Code:

1
2
3
4
5
 
my $inputstream = new IO::Pipe;
$inputstream->reader("zcat -fq $filename") or printf("[%s] Warning : Unable to open %s for reading\n", (scalar(localtime()), $filename));
...
close($inputstream);

Non, là tu n'appelles pas le bon close()...

Code:

1
2
3
4
5
 
my $inputstream = new IO::Pipe;
$inputstream->reader("zcat -fq $filename") or printf("[%s] Warning : Unable to open %s for reading\n", (scalar(localtime()), $filename));
...
$inputstream->close();

--
Jedaï

Je vais tester aujourd'hui, je te donne les résultats d'ici ce soir

Bon apparemment, avec le "$inputstream->close();" ca passe mieux, même si ca ne résoud toujours pas les broken pipe ;)