# execute the Devel::REPL and paste Dumper output.
re.pl
$ my $ my $VAR1 = [
 'ResultSet',
 [
 {
 'xmlns' => 'urn:yahoo:maps',
 'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance',
 'xsi:schemaLocation' => 'urn:yahoo:maps http://api.local.yahoo.com /MapsService/V1/GeocodeResponse.xsd'
 },
 'Result',
 [
 {
 'precision' => 'address'
 },
 'Latitude', {}, 0, '28.312216' ,
 'Longitude', {}, 0, '-81.380514' ,
 'Address', {}, 0, '2335 Pepper Tree Ct' ,
 'City', {}, 0, 'Kissimmee' ,
 'State', {}, 0, 'FL' ,
 'Zip', {}, 0, '34744-2820' ,
 'Country', {}, 0, 'US'
 ]
 ]
 ];
$ARRAY1 = [
            'ResultSet',
            [
              {
                xmlns        => 'urn:yahoo:maps',
                "xmlns:xsi"  => 'http://www.w3.org/2001/XMLSchema-instance',
                "xsi:schemaLocation"
                             => 'urn:yahoo:maps http://api.local.yahoo.com /MapsService/V1/GeocodeResponse.xsd'
              },
              'Result',
              [
                { precision => 'address' },
                'Latitude',
                {},
                0,
                28.312216,
                'Longitude',
                {},
                0,
                -81.380514,
                'Address',
                {},
                0,
                '2335 Pepper Tree Ct',
                'City',
                {},
                0,
                'Kissimmee',
                'State',
                {},
                0,
                'FL',
                'Zip',
                {},
                0,
                '34744-2820',
                'Country',
                {},
                0,
                'US'
              ]
            ]
          ];

# now try to narrow down the correct path
$ $VAR1->[1]
$ARRAY1 = [
            {
              xmlns        => 'urn:yahoo:maps',
              "xmlns:xsi"  => 'http://www.w3.org/2001/XMLSchema-instance',
              "xsi:schemaLocation"
                           => 'urn:yahoo:maps http://api.local.yahoo.com /MapsService/V1/GeocodeResponse
            },
            'Result',
            [
              { precision => 'address' },
              'Latitude',
              {},
              0,
              28.312216,
              'Longitude',
              {},
              0,
              -81.380514,
              'Address',
              {},
              0,
              '2335 Pepper Tree Ct',
              'City',
              {},
              0,
              'Kissimmee',
              'State',
              {},
              0,
              'FL',
              'Zip',
              {},
              0,
              '34744-2820',
              'Country',
              {},
              0,
              'US'
            ]
          ];
# oops wrong way
$ $VAR1->[1][3]

# aah closer
$ $VAR1->[1][2]
$ARRAY1 = [
            { precision => 'address' },
            'Latitude',
            {},
            0,
            28.312216,
            'Longitude',
            {},
            0,
            -81.380514,
            'Address',
            {},
            0,
            '2335 Pepper Tree Ct',
            'City',
            {},
            0,
            'Kissimmee',
            'State',
            {},
            0,
            'FL',
            'Zip',
            {},
            0,
            '34744-2820',
            'Country',
            {},
            0,
            'US'
          ];
# got the Latitude
$ $VAR1->[1][2][4]
28.312216