allow /0|NaN/ on some bigfloatpm.t tests for portability; other

misc fixes

p4raw-id: //depot/perl@2942

1 files changed, 2 insertions, 2 deletions

diff --git a/t/io/argv.t b/t/io/argv.t
index cb2ffb346e..c6565dc9c7 100755
--- a/t/io/argv.t
+++ b/t/io/argv.t
@@ -46,7 +46,7 @@ else
 open(try, '>Io.argv.tmp') or die "Can't open temp file: $!";
 close try;
 @ARGV = 'Io.argv.tmp';
-$^I = '';
+$^I = '.bak';
 $/ = undef;
 while (<>) {
     s/^/ok 6\n/;
@@ -56,4 +56,4 @@ open(try, '<Io.argv.tmp') or die "Can't open temp file: $!";
 print while <try>;
 close try;
 
-END { unlink 'Io.argv.tmp' }
+END { unlink 'Io.argv.tmp', 'Io.argv.tmp.bak' }