for(grep{-f$_}readdir(D)){ ... }