NAME

SYNOPSIS

GET CENTER POINT FROM AREA CODE

  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
    

GET AREACODE FROM LOCATION POINT

  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
    

INTEGRATE WITH HTTP::MobileAgent::Plugin::Locator

  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
    

DESCRIPTION

easy to get the center point of area.

ADDITIONAL METHODS FOR Geo::Coordinates::Converter core.

Geo::Coordinates::Converter->areacode()

areacode accessor

Geo::Coordinates::Converter::Point->areacode()

areacode accessor

INTERNAL METHODS

name

detect

from

to

DO NOT USE DIRECTLY

AUTHOR

SEE ALSO

LICENSE