use File::Find::Rule; my @files = File::Find::Rule->file()->in( $directory );