for my $key (keys %Hash_filematches) {
   my $value = $Hash_filematches{$key};

   if (scalar @$value) { # check that the arrayref isn't empty
      print "KEY: $key\n";
      print "VALUES: ", join(", ", @$value), "\n\n";
   }
}