foreach my $key (keys %{$hash}) { my $ar = $hash{$key}; foreach (@{$ar}) { $_ eq $array->[0] && shift @{$array} && !@{$array} && last; } if (!@{$array}) { # was found in the hashes array } }