web-dev-qa-db-ja.com

Perlにディレクトリが存在するかどうかを確認する方法は?

使用する前にファイルが存在するかどうかを確認するには、次を使用できます。

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

しかし、ディレクトリが存在するかどうかを識別する方法は?

52
Nano HE

-dを使用します( ファイルテストの完全なリスト

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を使用します。

93
Brad Mace