Add a test for study() on tied scalars, by Andy Lester after

[p5sagit/p5-mst-13.2.git] / t / io / pipe.t

diff --git a/t/io/pipe.t b/t/io/pipe.t
index c32f3b1..d411719 100755 (executable)
--- a/t/io/pipe.t
+++ b/t/io/pipe.t
@@ -167,6 +167,7 @@ SKIP: {
 # Test new semantics for missing command in piped open
 # 19990114 M-J. Dominus mjd@plover.com
 { local *P;
+  no warnings 'pipe';
   ok( !open(P, "|    "),        'missing command in piped open input' );
   ok( !open(P, "     |"),       '                              output');
 }
@@ -182,7 +183,8 @@ is($?, 42,      'status unaffected by implicit close');
 $? = 0;
 
 # check that child is reaped if the piped program can't be executed
-{
+SKIP: {
+  skip "/no_such_process exists", 1 if -e "/no_such_process";
   open NIL, '/no_such_process |';
   close NIL;