Help for this page

Select Code to Download

Select or download this

use Data::Dumper;

print Dumper(\%agency);

Select or download this
```
$agency{$e4}->{$e7}->{$e6}++;
```

Select or download this

    $agency{$e3}->{$e4}->{$e7}->{$e6}++;