Location::GeoTool

概要

地理情報を扱う Perl モジュールです。
このモジュールを使うことにより各種座標系の変換や、２点間の距離と方向の取得が簡単に行えます。
CPAN にありますので、何も考えずにインストールできます。

使用方法

以下、２点間の距離と方向を取得する例です。

Ａ地点
経度：139.766103
緯度：35.681391

Ｂ地点
経度：139.758587
緯度：35.666195

 my $g = Location::GeoTool->new({changeMyself => 0,enableWantarray => 0});
 $g->set_coord('35.681391','139.766103','tokyo','degree');
 my $dirobj = $g->direction_point('35.666195',' 139.758587','tokyo','degree');
 print 'distance  = ' . $dirobj->distance  . "\n";
 print 'direction = ' . $dirobj->direction . "\n";