diff options
Diffstat (limited to 'ext/IPC-Open3/t/fd.t')
| -rw-r--r-- | 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 2a71b1387c..adb1f5cd65 100644 --- a/ext/IPC-Open3/t/fd.t +++ b/ext/IPC-Open3/t/fd.t @@ -36,7 +36,7 @@ plan 3; fresh_perl_like(<<"EOP", use IPC::Open3; -open FOO, '$file' or die \$!; +open FOO, '<', '$file' or die \$!; open3('<&' . fileno FOO, my \$out, undef, \$ENV{PERLEXE}, '-eprint scalar <STDIN>'); print <\$out>; EOP |