In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/1f563db471aa8a0064982ecfd3d60911d0eaa3ff?hp=be1cc4519b5ba35ec8c5b8a2b4a62c72cff05a2e>
- Log ----------------------------------------------------------------- commit 1f563db471aa8a0064982ecfd3d60911d0eaa3ff Author: Tony Cook <t...@develop-help.com> Date: Fri Oct 1 18:58:37 2010 +1000 rt 76474: Avoid the child perl reading from stdout FD 1 is stdout, and the "<&1" redirect in the test sets the child to read from its parent's stdout, on Linux (and presumably OS X) doesn't let you read from stdout, but FreeBSD does, without the -e perl will try to read its program from stdin, so provide one. ----------------------------------------------------------------------- Summary of changes: ext/IPC-Open3/t/fd.t | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/ext/IPC-Open3/t/fd.t b/ext/IPC-Open3/t/fd.t index 14dbe72..a11c72a 100644 --- a/ext/IPC-Open3/t/fd.t +++ b/ext/IPC-Open3/t/fd.t @@ -16,7 +16,7 @@ plan 1; { my $stderr = runperl( switches => ['-MIPC::Open3', '-w'], - prog => 'open3(q _<&1_, my $out, undef, $ENV{PERLEXE})', + prog => 'open3(q _<&1_, my $out, undef, $ENV{PERLEXE}, q_-e0_)', stderr => 1, stdin => '', ); -- Perl5 Master Repository