Yet Another CPAN Grep

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

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

package Geo::Coder::Multimap;

use strict;
use warnings;

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

our $VERSION = '0.01';
$VERSION =

    output => 'json',
        $country ? (countryCode => $country) : (),
    );

    my $res = $self->ua->get($uri);
    return unless $res->is_success;

    my $data = eval { from_json($res->decoded_