foreach my $key (keys %hash) { print "$key: \t @{$hash{$key}}\n"; }