diff options
Diffstat (limited to 't/io')
-rwxr-xr-x | t/io/argv.t | 2 | ||||
-rwxr-xr-x | t/io/fs.t | 6 |
2 files changed, 4 insertions, 4 deletions
diff --git a/t/io/argv.t b/t/io/argv.t index cee43fc46e..40ed23b373 100755 --- a/t/io/argv.t +++ b/t/io/argv.t @@ -33,4 +33,4 @@ if ($y eq "1a line\n2a line\n3a line\n") else {print "not ok 5\n";} -`/bin/rm -f Io.argv.tmp`; +`/bin/rm -f Io.argv.tmp` if -x '/bin/rm'; @@ -9,7 +9,7 @@ chop($wd); `rm -f tmp 2>/dev/null; mkdir tmp 2>/dev/null`; chdir './tmp'; -`/bin/rm -rf a b c x`; +`/bin/rm -rf a b c x` if -x '/bin/rm'; umask(022); @@ -19,9 +19,9 @@ close(fh); open(fh,'>a') || die "Can't create a"; close(fh); -if (link('a','b')) {print "ok 2\n";} else {print "not ok 2\n";} +if (eval {link('a','b')}) {print "ok 2\n";} else {print "not ok 2\n";} -if (link('b','c')) {print "ok 3\n";} else {print "not ok 3\n";} +if (eval {link('b','c')}) {print "ok 3\n";} else {print "not ok 3\n";} ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime, $blksize,$blocks) = stat('c'); |