for $hk (keys %$hash) {
    print "$hk\n" for grep {$_ eq $search} @{$hash->{$hk}->{member}};
}