Help for this page
$VAR1 = { 'Toys' => bless( { ... ] }, 'ArrayOfToy' ) };
for my $toy ( @{$getToysResults->{Toys}->{Toy}} ) { for my $l ( @{$toy->{ToyLocations}->{ToyLocation}} ) { print "$l->{locationName}\n" } }