$geocode = $result->[0];
  print "Match: lat=$geocode->{'lat'} long=$geocode->{'long'}\n";