my @dirs = File::Find::Rule->directory()->name(qr/blah[0-9]/)->in('C:\\Windows\\Program Files'); my @files = File::Find::Rule->file()->name('setup.exe')->in(@dirs);