
Geo::Coordinates::Converter::Format::IArea - get center point from iArea

use Geo::Coordinates::Converter;
use Geo::Coordinates::Converter::iArea;
my $geo = Geo::Coordinates::Converter->new( format => 'iarea', areacode => '00205' );
my $point = $geo->convert('degree' => 'wgs84');
print "lat: ", $point->lat, " lng: ", $point->lng, "\n";
# => lat: 42.859220 lng: 141.492367
use Geo::Coordinates::Converter;
use Geo::Coordinates::Converter::iArea;
my $geo = Geo::Coordinates::Converter->new( format => 'degree', datum => 'tokyo', lat => '42.859220', lng => '141.492367' );
my $point = $geo->convert('iarea');
print $point->areacode, "\n";
# => 00205
use Geo::Coordinates::Converter;
use Geo::Coordinates::Converter::iArea;
use CGI;
use HTTP::MobileAgent;
use HTTP::MobileAgent::Plugin::Locator;
my $q = CGI->new();
my $agent = HTTP::MobileAgent->new();
my $orig_point = $agent->get_location($q);
my $geo = Geo::Coordinates::Converter->new( point => $orig_point->clone );
my $point = $geo->convert('iarea');
print $point->areacode, "\n";
# => 00205

Geo::Coordinates::Converter::Format::IArea is utilities for DoCoMo iArea.
easy to get the center point of area.

areacode accessor
areacode accessor


Kazuhiro Osawa, Tokuhiro Matsuno

Geo::Coordinates::Converter::iArea, Location::Area::DoCoMo::iArea

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.