Perl: Hachage multidimentionel / Multidimentional Hash
Exemple de Hachages de Hachages / Sample Hash of Hash:
%HoH=(
Tea => {
Sencha => "green",
Linden => "herbal",
Darjeeling => "black",
}
Wine => {
Chardonnay => "white",
Merlot => "red",
}
};
Utilisation et affichage d'un Hachages de Hachages / Using and Printing a Hash of Hash:
#un élement / sample element:
$HoH{"Tea"}{"Linden"} = "herbal";
# affichage / print:
foreach $beverage (keys %HoH){
print "beverage: ",
for $name (keys %{ $HoH{$beverage} } ){
print "$role = $HoH{$beverage}{$role}";
}
print"\n";
}
Ouvrage de référence/ reference book: Programming Perl, 3rd edition (O'Reilly)
 |
July 2003
|