map { qq{$_
} } ## format each file sort ## sort them grep { !/^\./ and -T "$dir$_" } ## no .name files, text files only readdir MYDIR