Yet Another CPAN Grep

Geo-Coder-GooglePlaces ( N/NH/NHORNE/Geo-Coder-GooglePlaces-0.06.tar.gz, NHORNE, 2023; MetaCPAN )

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

package Geo::Coder::GooglePlaces::V3;

use strict;
use warnings;

use Carp;
use Encode;
use JSON::MaybeXS;
use HTTP::Request;
use LWP::UserAgent;
use URI;

my @ALLOWED_FILTERS = qw/route locality admi

e} ? 'latlng' : 'query';

    my $uri = URI->new("https://$self->{host}/maps/api/place/textsearch/json");
    my %query_parameters = ($loc_param => $location);
    $query_parameters{language} = $self-

ogle Places API returned error: ', $res->status_line());
    }

    my $json = JSON::MaybeXS->new()->utf8();
    my $data = $json->decode($res->decoded_content());

    unless($data->{status} eq 'OK'