- 授权协议: Artistic License/GPL
- 开发语言: Perl
- 操作系统: Windows
- 软件首页: http://search.cpan.org/~perhenrik/Geo-GeoNames/lib/Geo/GeoNames.pm
软件介绍
======Perl GeoNames Client 是 GeoNames 的 Perl 语言客户端开发包。
示例代码:
use Geo::GeoNames; use Data::Dumper; my $geo = new Geo::GeoNames(); # make a query based on placename my $result = $geo->search(q => 'Fredrikstad', maxRows => 2); # print the first result print " Name: " . $result->[0]->{name}; print " Longitude: " . $result->[0]->{lng}; print " Lattitude: " . $result->[0]->{lat}; # Dump the data structure into readable form # This also will show the attributes to each found location Data::Dumper->Dump() # Make a query based on postcode $result = $geo->postalcode_search(postalcode => "1630", maxRows => 3, style => "FULL");