for my $nr (keys %{$hash{test}}) { if (exists $hash{test}{$_}{test2}) print $nr; } }