mehrdimensionalen Hash traversieren

[Erwin]

Hi,

eine Config-Datei wird in einen mehrstufigen Hash geparst:

$gruppe{$untergruppe}{$mitglied};

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

#Alles wieder im gleichen Format ausgeben
foreach $sec (keys %data)
{ print "[$sec]\n";
  foreach $key (keys %{$data{$sec}})
  { print "$key=$data{$sec}{$key}\n"; }
}

It means
foreach my $untergruppe(keys %gruppe){
 print "Untergruppe: $untergruppe\n";
 foreach my $member(keys %{gruppe{$untergruppe}}){
  print "Member: $member\n";
 }
}

Erwin