DUMP:
$VAR1 = {
'blist' => {
'Central600' => {
'checked' => 'on',
'curr' => 'off',
'desc' => 'Oregon 600-XTR, May 30-31 '
},
'TriCities200' => {
'checked' => 'no',
'curr' => 'off',
'desc' => 'Tri-Cities 200, April 18 '
},
'CoveredBridges400' => {
'checked' => 'on',
'curr' => 'yes',
'desc' => 'Covered Bridges 400, May 9'
},
}, # end of %blist
# other items
}
####
Brevets spec'd manually
[% blist.CoveredBridges400.desc %]
[% blist.CoveredBridges400.curr %]
[% blist.CoveredBridges400.checked %]
end Brevets spec'd manually
####
Brevets spec'd manually
Covered Bridges 400, May 9
off
on end Brevets spec'd manually
####
[% FOREACH bb IN blist %]
4 bb $bb
5 bb.key $bb.key
6 blist.bb blist.$bb
7 bb.item desc $bb.key.item('desc')
7 blist.bb.keys blist.$bb.keys
[% FOREACH bkey = blist.$bb.keys.shift %]
[% bkey %] => [% # blist.$bb.$bkey %]
[% END %]
7a blist.bb.vals blist.$bb.values
[% FOREACH ba = blist.$bb.values.list %]
[% ba %]
[% END %]
[% FOREACH ba IN blist.bb.values %]
$ba
[% END %]
8 [% blist.$bb.desc %] blist.($bb.key).desc or blist.bb.desc
9 [% blist.$bb.curr %] blist.($bb.key).curr or blist.bb.curr
10 [% blist.$bb.checked %] [% blist.$bb.key.checked %]
[% END %]
####
4 bb HASH(0xd977f0)
5 bb.key CoveredBridges400
6 blist.bb blist.HASH(0xd977f0)
7 bb.item desc CoveredBridges400('desc')
7 blist.bb.keys blist.ARRAY(0xd8f730)
7a blist.bb.vals blist.ARRAY(0xd8f7b0)
8 blist.(CoveredBridges400).desc or blist.bb.desc
9 blist.(CoveredBridges400).curr or blist.bb.curr
10