mehrdimensionalen Hash traversieren

[Struppi]

$gruppe{$untergruppe}{$mitglied};

Der Hash wird korrekt aufgebaut, das habe ich bereits geprüft.
Jetzt sollen die Mitglieder dynamisch durchlaufen werden:

$untergruppe = "test";
while ( ($key, $val) = each ($gruppe{$untergruppe}) )

while ( my ($key, $val) = each %{$gruppe{$untergruppe})

{
  print " $key = $val <br>";

while ( ($k, $v) = each ($val) )

while ( my ($k, $v) = each %$val )

{
    print " $k = $v <br>";
  }
}

Der Code verursache eine Fehlermeldung (über CGI, daher keine genaue Fehlermeldung, bzw. nur interner Server-Error)

Ja, du kannst die Fehler in dem Logfile deines Servers finden, aber es gibt auch andere Möglichkeiten.

use CGI::Carp qw/fatalsToBrowser/;

Außerdem solltest du dringend use strict verwenden damit kannst du dir einen Haufen Tippfehler ersparen.

Struppi.