Help for this page

Select Code to Download


  1. or download this
    print Dumper ($tmp);
  2. or download this
    $VAR1 = [
          bless( {
...
                             ]
                 }, 'main::LOC' )
        ];
  3. or download this
    print $tmp->[0]->{Kids}->[1]->{Kids}->[0]->{Text}, 
      "\n", 
      $tmp->[0]->{Kids}->[2]->{Kids}->[0]->{Text};
  4. or download this
          
Eagle Way
Gotham City
  5. or download this
    for ( @{$tmp->[0]->{Kids}} )
{
    print $_->{Kids}->[0]->{Text}, "\n";
}