標準エラーにメッセージを出力する。
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";
}
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";
}