summaryrefslogtreecommitdiff
path: root/t/io
diff options
context:
space:
mode:
Diffstat (limited to 't/io')
-rwxr-xr-xt/io/argv.t2
-rwxr-xr-xt/io/fs.t6
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';
diff --git a/t/io/fs.t b/t/io/fs.t
index 9eaf1da5f2..a219b81eef 100755
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -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');