foreach my $value (@{$hash{'hash1'}}) {...
1
2
3
4
5
6
7
8
%hash = (
hash1 => [sort keys %hashInArry1],
hash2 => [sort keys %hashInArry2],
);
foreach my $key (keys %hash) {
print "$key: ", join(", ", @{$hash{$key}}), "\n";
}
2012-04-10T07:39:37 bloonixCode: (dl )foreach my $value (@{$hash{'hash1'}}) {...
2012-04-10T08:49:25 hlubenow
2012-04-10T10:14:40 pq