You should check the directory for readability with -r and for executability (ie you are allowed to chdir to it) with -x:

if (-r $dir && -x $dir ){
    print "$dir => OK\n";
}
[download]