It seem to work now... It get's coordinates even for the unexisting location like 'CorseMétéo'. However it still gives an error : "Useless use of string in void context at geoTest.pl line 27.". The code :
#!/usr/bin/perl -w
use strict;
use locale;
use warnings;
#use diagnostics;
use utf8;
binmode(STDIN, "encoding(utf8)");
binmode(STDOUT, "encoding(utf8)");
binmode(STDERR, "encoding(utf8)");
use Geo::Coder::Google;
my @place = ('Seattle', 'France', 'CorseMétéo', 'New Delhi');
my ($long, $lat);
foreach my $place(@place){
my $geocoder = Geo::Coder::Google->new(apikey => '{MyAPIkeyHere}')
+;
my $response;
until (defined $response){
eval{
$response = $geocoder->geocode(location => $place);
if ($@){
"Couldn't get location : $place\n";
}else{
($long, $lat) = @{ $response->{Point}{coordinates} };
}
}
}
print "$place\n";
print "$long\n";
print "$lat\n";
}
Do you think it's a problem if I use the code even if it gives an error bu it works?
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|