Re: non-blocking IO from open("-|")ing an external program with fcntl


Come for the quick hacks, stay for the epiphanies.
	PerlMonks

Re: non-blocking IO from open("-|")ing an external program with fcntl

by jwkrahn (Abbot)

on Jun 12, 2020 at 21:38 UTC ( [id://11118002]=note: print w/replies, xml )

Need Help??

in reply to non-blocking IO from open("-|")ing an external program with fcntl

my $pid = open my $fh, '-|', 'sleep 3; echo aaaa' // die $!;
[download]

That will never die because of precedence. (The string 'sleep 3; echo aaaa' is always true.)

$ perl -MO=Deparse -e'my $pid = open my $fh, "-|", "sleep 3; echo aaaa
+" // die $!;'
my $pid = open(my $fh, '-|', 'sleep 3; echo aaaa');
-e syntax OK
[download]

You need to add parentheses:

$ perl -MO=Deparse -e'my $pid = open( my $fh, "-|", "sleep 3; echo aaa
+a" ) // die $!;'
my $pid = open(my $fh, '-|', 'sleep 3; echo aaaa') // die($!);
-e syntax OK
[download]