in reply to Re: nested hashes or object oriented
in thread nested hashes or object oriented

You can also omit superfluous arrows, so 
    $agency{$e3}->{$e4}->{$e7}->{$e6}++;

[download]
can be 
    $agency{$e3}{$e4}{$e7}{$e6}++;

[download]

In Section Seekers of Perl Wisdom