....
0544| my $gm_api_key = 'ABQIAAAAcLKGeFVyQztpHQgksRtRxxRU6Gxgi6yV55KgB6yoYqtiuCoicxQ99eMs45M9xnFP7znF2usEgKFG2Q';
0545| my $geo = Geo::Coder::Google->new(
0546| # apikey => $gm_api_key,
0547| gl => $self->country_code,
0548| apiver => 3,
0549| );
0550|
0551| my $location = $self->city;
0552| $location = join(", ", $self->city, $self->state) if $self->state;
0553| my $res = $geo->geocode(location => $location);
0554|
0555| # lng
0556| if (! defined $res->{geometry}{location}{lng}) {
0557| $res->{lng} = 0;
0558| }
0559| else {
0560| $res->{lng} = $res->{geometry}{location}{lng};
0561| }
0562| # lat
0563| if (! $res->{geometry}{location}{lat}) {
....00| &CGI::HTMLError::show_source called at /usr/local/share/perl/5.14.2/Carp.pm line 167
01| &Carp::croak called at /usr/local/share/perl/5.14.2/Geo/Coder/Google/V3.pm line 114
02| &Geo::Coder::Google::V3::geocode called at agg/Astrolog/Chart.pm line 553
03| &Astrolog::Chart::_build_latlng_geo_query called at agg/Astrolog/Chart.pm line 207
04| &Astrolog::Chart::BUILD called at /usr/local/lib/perl/5.14.2/Class/MOP/Method.pm line 128
05| &Class::MOP::Method::execute called at /usr/local/lib/perl/5.14.2/Moose/Object.pm line 54
06| &Moose::Object::BUILDALL called at /usr/local/lib/perl/5.14.2/Moose/Meta/Class.pm line 279
07| &Moose::Meta::Class::new_object called at /usr/local/lib/perl/5.14.2/Moose/Object.pm line 24
08| &Moose::Object::new called at /var/www/astroagg/index.pl line 71
Google Maps API returned status 'REQUEST_DENIED' at agg/Astrolog/Chart.pm line 553.
For help, please send mail to the webmaster (support@initselftech.com), giving this error message and the time and date of the error.