patch for db-recno.t
[p5sagit/p5-mst-13.2.git] / t / io / argv.t
old mode 100644 (file)
new mode 100755 (executable)
index 6f55896..40ed23b
@@ -1,6 +1,6 @@
 #!./perl
 
-# $Header: argv.t,v 4.0 91/03/20 01:50:46 lwall Locked $
+# $RCSfile: argv.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:25 $
 
 print "1..5\n";
 
@@ -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';