foreach my $key3 (keys (% { $hash->{$key}->{$key2}})) {
    print "Schluessel: $key3\n";
}