diff options
| -rw-r--r-- | lib/File/stat.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/File/stat.t b/lib/File/stat.t index c29d9abecd..bd02466405 100644 --- a/lib/File/stat.t +++ b/lib/File/stat.t @@ -1,4 +1,4 @@ -#!./perl +0#!./perl BEGIN { chdir 't' if -d 't'; @@ -76,6 +76,8 @@ SKIP: { main::skip("Win32: different stat-info on filehandle", 1) if $^O eq 'MSWin32'; main::skip("dos: inode number is fake on dos", 1) if $^O eq 'dos'; + main::skip("OS/2: inode number is not constant on os/2", 1) if $^O eq 'os2'; + main::is( "@$stat", "@$stat3", '... and must match normal stat' ); } |