NAME

Geo::GeoPo - Simple encoder/decoder of GeoPo format

SYNOPSIS

use Geo::GeoPo;

my ( $lat, $lng, $scale ) = geopo2latlng('Z4RHXX');
# 35.658578, 139.745447, 6

my ( $lat, $lng, $scale ) = geopo2latlng('http://geopo.at/Z4RHXX');
# Same result

my $geopo = latlng2geopo( 35.658578, 139.745447, 6 );
# Z4RHXX

my $geopo = latlng2geopo( 35.658578, 139.745447, 6, { as_url => 1 } );
# http://geopo.at/Z4RHXX

DESCRIPTION

GeoPo is a web service that shrink geolocation(latitude and longitude) to short URL. Then browser of receiver can display the map matched to browse environment. Everyone can use GeoPo for free, and no registration.

You can get more information on http://geopo.at/intl/en/.

Geo::GeoPo is simple encoder/decoder of GeoPo.

METHOD

• geopo2latlng

• latlng2geopo

AUTHOR

Original programmed by Shintaro Inagaki

Module packaged by OHTSUKA Ko-hei <nene@kokogiko.net>

SEE ALSO

http://geopo.at/intl/ja/developer/sample_code.html#perl

LICENSE

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