3 ms·

in Perl: sub values_in(\@\%) { my ($keys, $d) = @_; grep { $d->{$_} } @$keys }