use File::Find::Rule; my $dirname = 'C:/temp'; # find all the .tiff? files in $dirname my @files = File::Find::Rule->file() ->name( m{\.tiff?$} ) ->in( $dirname );