Yet Another CPAN Grep

Geo-Coder-ArcGIS ( G/GR/GRAY/Geo-Coder-ArcGIS-0.01.tar.gz, GRAY, 2011; MetaCPAN )

Geo-Coder-ArcGIS/lib/Geo/Coder/ArcGIS.pm ( view source; MetaCPAN )

package Geo::Coder::ArcGIS;

use strict;
use warnings;

use Carp qw(croak);
use JSON;
use LWP::UserAgent;
use URI;

our $VERSION = '0.01';
$VERSION = eval $VERSION;

sub new {
    my ($class, %params)

 if $self->{https};
    $uri->query_form(
        SingleLine => $location,
        f          => 'json',
        outFields  => '*',
    );

    my $res = $self->{response} = $self->ua->get(
        $u

 return unless $res->is_success;

    # Change the content type of the response from 'application/json' so
    # HTTP::Message will decode the character encoding.
    $res->content_type('text/plain');