http://www.perlmonks.org?node_id=947320


in reply to Re^2: Beginners guide to File::Find
in thread Beginners guide to File::Find

See File::Find::Rule, the synopsis has an example

use File::Find::Rule; # find all the subdirectories of a given directory my @subdirs = File::Find::Rule->directory->in( $directory );

For future reference, new questions go in Seekers Of Perl Wisdom