在Perl中,可以使用-e
文件測試運算符來判斷文件是否存在。該運算符返回一個真值(1)如果文件存在,并返回一個假值(空字符串)如果文件不存在。
以下是一個示例代碼:
my $filename = "example.txt";
if (-e $filename) {
print "文件存在\n";
} else {
print "文件不存在\n";
}
在上述示例中,首先定義了一個文件名example.txt
,然后使用-e
文件測試運算符來判斷文件是否存在。如果文件存在,則打印"文件存在",否則打印"文件不存在"。