use File::Find::Rule; my @dirs = ( '.' ); my @files = File::Find::Rule->file()->name('*.zip')->in(@dirs);