Not only does Perl have an operator that tells you whether a directory entry is a directory, it also has File::Find, the standard module used for recursively descending through a directory tree. There are other contenders, like File::Find::Rule, File::Finder and others, all in the File::Find namespace.