grep { ... } @remote_list

##</code><code>##

grep { $_->{filename} eq $file } @remote_list

##</code><code>##

my %local_files = map { $_ => 1 } @local_files;
for (@remote_files) {
   print "match\n" if $local_files{ $_->{filename} };
}