这是一个带有子例程的文件,该子例程从Google API获取long/lat数据并返回这两个值。但是,子程序没有被调用,因此脚本什么也不做。
对脚本开头的以下更改将从命令行获得输入,并将数据返回到终端:
#!/usr/bin/perl
use strict;
use warnings;
use LWP::Simple; # from CPAN
use JSON qw( decode_json ); # from CPAN
# get command line input
my $address = $ARGV[0];
# get latitude/longitude and output
my ($lat, $long) = getLatLong( $address );
print "lat: $lat, long: $long\n";
sub getLatLong($){
my ($address) = @_;
my $format = "json"; #can also to 'xml'
...
然后,您可以按如下方式调用脚本:
$ long_lat_script.pl '25 Jackson street, Pretoria, South Africa'
至于关于此API使用策略的注释,这取决于您想将其用于什么目的。使用此API时确实需要显示地图;然而,如果你在网站上需要这些数据,可以(谷歌也建议)批量收集这些数据,而不是重复要求相同的数据。我曾经以类似的方式将此API用于大约5000个地址。你可以阅读更多关于这方面的内容
here
.
