use File::Find;

my @directories = ( "/home/");

find ($File::Find::name if /\.results$/ , @directories );