How to see if a directory exists or not in Perl?

Question

To see if a file exists before using it, we can use:

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

But how to indentify a directory ex

Answer 1

Use -d (full list of file tests)

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
}

As a note, -e doesn't distinguish between files and directories. To check if something exists and is a plain file, use -f.