$ touch file1 file3
$ perl -e'while(<>){1;}continue{print "$ARGV\n" if eof;}; print $!' file1 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 $!' file[123]
$