foreach my $key (sort keys %clean_data) {
print $key, $/;
foreach my $data (@{$clean_data{$key}}) {
# the hash value $clean_data{$key} is an array reference
# wrapping it in @{} gives us the array it references.
# this array contains array references,
# so @$data gives us an array
print "\t", @$data, $/;
}
}
- Dotan In reply to simple breakup of this code
by Anonymous Monk
in thread Extracting non-consecutive but related items from an array.
by blackadder
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |