$ perl -e'open my $fh, "cat |" or die $!'
<waits forever>

$ perl -e'open our $fh, "cat |" or die $!'
<returns immediately>