Help for this page

Select Code to Download

Select or download this
```
# WRONG
%HOH = [ ... ];
```

Select or download this

#!/usr/bin/perl
use warnings;
...
    push @{ $HoH2{ $hash->{person} }{ $hash->{age} } }, @{ $hash->{pos
+session} };
}
print Dumper \%HoH2;