Use a file glob:

$ touch file1 file3
$ perl -e'while(<>){1;}continue{print "$ARGV\n" if eof;}; print $!' fi
+le1 file2 file3
Can't open file2: No such file or directory at -e line 1.
$ perl -e'while(<>){1;}continue{print "$ARGV\n" if eof;}; print $!' fi
+le[123]
$
[download]