in reply to Accessing an AoHoAoH

On the subject of style: I like to decompose nested-structure dereferences into "sensical" single-layer dereferences, as below:

#! /usr/bin/perl -w use strict; my @AoH=( { chapter => "Basic", page => [ { paragraph => "lesson1"}, { paragraph => "lesson2"} ] }, { chapter => "Advanced", page => [ { paragraph => "lesson3"}, { paragraph => "lesson4"} ] } ); foreach my $ch (@AoH) { print $ch->{'chapter'}, "\n"; my $page = $ch->{'page'}; foreach my $paras (@$page) { print "\t", $paras->{'paragraph'}, "\n"; } }

I find this makes code using these structures easier to read, although longer. It's a judgement call as to whether your structure is dense enough to warrant the extra code.

(I also like to use -> for every deref and single-quote every hash key, but that's a whole different issue....)

--
F o x t r o t U n i f o r m
Found a typo in this node? /msg me
% man 3 strfry