Perl GeoNames Client

• 授权协议: 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"); 

本文地址：https://codercto.com/soft/d/26121.html