And for handling nesting, etc, you can use File::Path which is distributed with Perl core.