diff options
Diffstat (limited to 't/io/argv.t')
| -rwxr-xr-x | t/io/argv.t | 4 |
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' } |