...
my @list_of_files;

File::Find::find( \&add_to_list, $path );

sub add_to_list {
  push @list_of_files, $File::Find::name if ( /#some criteria# /);
}
...