use Path::Class::Rule; my @files = Path::Class::Rule->new->file->max_depth(1)->name('*.xml')->all( @dirs );