Select Code to Download

$hash{'somestring'}[0] = 13;
$hash{'somestring'}[1] = 24;

foreach my $k(keys %hash) {
    print "Key: $k\n";
...
        print " - ".$hash{$k}[$i]."\n";
    }
}