如何查看目录是否存在或不在Perl中?

要在使用文件之前查看文件是否存在,我们可以使用:

if (-e "filename.cgi") { #proceed with your code } 

但是如何识别一个目录是否存在?

使用-d ( 文件testing的完整列表 )

 if (-d "cgi-bin") { # directory called cgi-bin exists } elsif (-e "cgi-bin") { # cgi-bin exists but is not a directory } else { # nothing called cgi-bin exists } 

注意, -e不区分文件和目录。 要检查是否存在并且是纯文件,请使用-f