X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fio%2Fnargv.t;h=fb138576185194f035e42b7863101a3a6c5a262f;hb=ec3f2d8be8ce8cf45558045599c51ca3f4d57e3e;hp=f32e40d6eed4f1d32ef909de4170b34f7f262edf;hpb=21735c0044d3e2c727b5eb3bf3614d73a1036366;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/io/nargv.t b/t/io/nargv.t index f32e40d..fb13857 100755 --- a/t/io/nargv.t +++ b/t/io/nargv.t @@ -56,7 +56,7 @@ sub other { } sub mkfiles { - my @files = map { "scratch.$_" } @_; + my @files = map { "scratch$_" } @_; return wantarray ? @files : $files[-1]; }