Select Code to Download

#!/usr/bin/perl -w
use Data::Dumper;
...
no autovivification;
print "Emenity:   $hash->{tag}{Emenity}{v}\n";
print Data::Dumper::Dumper(\$hash);

$VAR1 = \{
            'lat' => '37.7987145',
...
            'lon' => '-122.4436971',
            'id' => '992609516'
          };