Under Mac OS X /dev/stdout is normally a symlink,

but when running the test it seems to become a socket.
So let's extend our censorship.

p4raw-id: //depot/perl@14077

diff --git a/t/op/stat.t b/t/op/stat.t
index 2f18382..4857836 100755 (executable)
--- a/t/op/stat.t
+++ b/t/op/stat.t
@@ -210,9 +210,9 @@ SKIP: {
     skip "opendir failed: $!", 3 if @DEV == 0;
 
     # /dev/stdout might be either character special or a named pipe,
-    # depending on which OS and how are you running the test, so let's
-    # censor that one away.
-    $DEV =~ s{^[cp].+?\sstdout$}{}m;
+    # or a symlink, or a socket, depending on which OS and how are
+    # you running the test, so let's censor that one away.
+    $DEV =~ s{^[cpls].+?\sstdout$}{}m;
     @DEV =  grep { $_ ne 'stdout' } @DEV;
 
     # /dev/printer is also naughty: in IRIX it shows up as