sub blah
{
   match_files(\@array, \%hash);
}

sub match_files
{
   # do stuff to compare array against hash
   push(@files, $array_element);  # add some ary elements
   return @files;
}


##</code><code>##

@returned_files = match_files(\@array, \%hash);

##</code><code>##

match_files(\@array, \%hash);
print "@files\n";

##</code><code>##

$returned_files = match_files(\@array, \%hash);
print "$@returned_files \n";