Help for this page

Select Code to Download

Select or download this
```
__DATA__

...


__END_DATA__
```

Select or download this

use strict;
use warnings;
...
    #push @{$HoA{$id}}, $name;
}