From 6320a86aa1aec64b81d9446bcbad2a508f869246 Mon Sep 17 00:00:00 2001 From: Andy Dougherty Date: Sun, 27 Jan 2002 04:46:38 -0500 Subject: [PATCH] Fix up recent op/stat.t failures Message-ID: p4raw-id: //depot/perl@14442 --- t/op/stat.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/t/op/stat.t b/t/op/stat.t index dac954a..c3bbe83 100755 --- a/t/op/stat.t +++ b/t/op/stat.t @@ -216,8 +216,11 @@ SKIP: { # /dev/stdout might be either character special or a named pipe, # or a symlink, or a socket, depending on which OS and how are # you running the test, so let's censor that one away. + # Similar remarks hold for stderr. $DEV =~ s{^[cpls].+?\sstdout$}{}m; @DEV = grep { $_ ne 'stdout' } @DEV; + $DEV =~ s{^[cpls].+?\sstderr$}{}m; + @DEV = grep { $_ ne 'stderr' } @DEV; # /dev/printer is also naughty: in IRIX it shows up as # Srwx-----, not srwx------. -- 2.7.4