Array of Hash

[Martin M.]

Ich kenne keinen Einwegschritt von einem AoH zu einem AoH
Ich kenne einen Einwegschritt von einem AoH zu einem HoH
Aus dem HoH lässt sich dann der neue AoH ableiten.

#mit HoH
my %HoH;
foreach( @AoH ){
$HoH{ ${$_}{server} }{ ${$_}{type} } +=  ${$_}{size} ;
}
#Ausgabe:
foreach(keys %HoH){
    foreach my $i( keys %{ $HoH{$_} } ){
      print "server:", $_, ", type:", $i, ", size:", $HoH{$_}{$i}, "\n";
    }
}

mfg Beat

Hi,

das ist schlicht grossartig! Danke.
Ich bin seit Tagen dran und komme auf so eine Lösung nicht. Aber immerhin verstehe ich sie.

Es funktioniert ja so ähnlich wie der "seen"-hash in dem unique-beispiel, aber eben mit einem HoH und dem Wert von size, anstatt mit einer 1.

Da fehlt mir glaub wirklich das Programmierhirn um auf solche Lösungen zu kommmen :(

ciao,
Martin