如何檢查文件是否不區分大小寫

Question

我想檢查Perl中是否存在文件。 這可以使用(-e $filename)來完成。 但這是區分大小寫的。 如何檢查不區分大小寫。 我必須只使用核心包來實現這一目標。

Answer 1

從這里偷來了 。

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