Perl Data structures - Hash of Arrays

Method 1:

$HoA = {
    flintstones => [ "fred", "barney" ],
    jetsons => [ "george", "jane", "elroy" ],
    simpsons => [ "homer", "marge", "bart" ],
    };

foreach (keys %{$HoA})
{
    print "$_ => @{$HoA->{$_}}\n";
}

Read more »