perl - 如何检查文件是否存在不区分大小写

Question

我想检查文件是否存在于 Perl 中。这可以使用 (-e $filename) 来完成。但这是区分大小写的。如何检查不区分大小写。我必须只使用核心包来实现这一目标。

Answer 1

盗自 here .

(grep {/$file/i} <$dir/*>) or die "$file not exist in $dir\n";