in reply to Returning sub directories
What have you tried? Why not use File::Find::Rule, as previously advised here and here?