If I put this in a script and try to print out each entry in the %TV hash, I would expect to get three results:%TV = ( flintstones => { series => "flintstones", nights => [ qw(monday thursday friday) ], members => [ { name => "fred", role => "lead", age => 36, }, { name => "wilma", role => "wife", age => 31, }, { name => "pebbles", role => "kid", age => 4, }, ], }, jetsons => { series => "jetsons", nights => [ qw(wednesday saturday) ], members => [ { name => "george", role => "lead", age => 41, }, { name => "jane", role => "wife", age => 39, }, { name => "elroy", role => "kid", age => 9, }, ], }, simpsons => { series => "simpsons", nights => [ qw(monday) ], members => [ { name => "homer", role => "lead", age => 34, }, { name => "marge", role => "wife", age => 37, }, { name => "bart", role => "kid", age => 11, }, ], }, ); foreach ( %TV ) { print "%_\n"; }
but instead I get:flintstones jetsons simpsons
Is there something wrong with the example? Or am I accessing the data incorrectly? this is with Perl 5.14.2 on Windows.simpsons HASH(0x237a120) jetsons HASH(0x2379e80) flintstones HASH(0x2379bc8)
In reply to hash of complex records example by rudds_perl_habit
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |