標準エラーにメッセージ出力

標準エラーにメッセージを出力する。

print STDERR "File not found.\n";

見つからなかったファイル名を出力する。

my $file1= 'test1.txt';
my $file2= 'test2.txt';

if (!-f $file1) {
　　print STDERR "$file1 not found.\n";
}

if (!-f $file2) {
　　print STDERR "$file2 not found.\n";
}