if (-d $filename) { ... }