if (-d !$dir) {

##</code><code>##

if (! -d $dir) {