pipe gzip error

[George Mpouras]

Any one knows why I am getting this "Illegal seek" error ?

use strict;
use warnings;
my $fh;
open $fh, '| /bin/gzip --force --quiet > "/tmp/akuro1.1316680468"' or warn
"oups: $^E\n";
print "problem *$?* *$^E* *$!*\n";
close $fh;

 

[Rainer Weikusat]

Any one knows why I am getting this "Illegal seek" error ?

use strict;
use warnings;
my $fh;
open $fh, '| /bin/gzip --force --quiet > "/tmp/akuro1.1316680468"' or warn
"oups: $^E\n";
print "problem *$?* *$^E* *$!*\n";
close $fh;

That's because of an lseek performed by some library routine with
the failure apparently considered to be harmless. Generally, a
specific value of errno aka $! is not an indication that 'an error
occurred' on its own: This is only the case when 'an error occurred'
was specifically signalled to the code calling a 'system routine'.
And that's not the case with the code above.