print $_->[0] for grep {
    @{$_->[1]}
} 
map { 
    [ $_, [ grep { $_ eq $search } @{$hash->{$_}{member}} ] ]
} keys %$hash;