Re: Printing hashes of arrays

How about this?

use strict;
use warnings;
use Data::Dumper;;

my %hash = (
    A => [1,2],
    B => [4,6],
);

# just to see what we have
print Dumper \%hash;

# and this prints what you want (i think)
print "$_ => @{ $hash{$_} }\n" for sort keys %hash;
[download]

I always bring Data::Dumper along for the ride when i deal with complex data structures such as this.

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

Comment on Re: Printing hashes of arrays Download Code