wie du auf werte in einem hash zugreifst, ist nicht klar? machst du doch mehrfach in deiner schleife. nur wenn es einfache strings sind, klappts nicht?

ist ganz einfach. statt
print "Schluessel: $key3\n";
schreibst du
print "Schluessel: $key3\nWert: $hash->{ $key }->{ $key2 }->{ $key3 }\n";

damit hast du den wert ausgegeben.