more sleep needed from slow systems (from Peter Haworth)

p4raw-id: //depot/perl@5841

diff --git a/t/io/pipe.t b/t/io/pipe.t
index 997c6bf..4559624 100755 (executable)
--- a/t/io/pipe.t
+++ b/t/io/pipe.t
@@ -98,7 +98,7 @@ if ($Config{d_sfio} || $^O eq 'machten' || $^O eq 'beos' || $^O eq 'posix-bc') {
 else {
     local $SIG{PIPE} = 'IGNORE';
     open NIL, '|true'  or die "open failed: $!";
-    sleep 4;
+    sleep 5;
     print NIL 'foo'    or die "print failed: $!";
     if (close NIL) {
        print "not ok 9\n";