#!/usr/bin/perl
use warnings;
use strict;
use Geo::Coordinates::Converter;
my $converter = Geo::Coordinates::Converter->new( lat => '35.65580', lng => '139.65580', datum => 'wgs84' );
my $geo_point = $converter -> convert(dms => 'tokyo');
printf "Lat: %s\n", $geo_point->lat;
printf "Lon: %s\n", $geo_point->lng;
printf "Datum: %s\n", $geo_point->datum;
printf "Format: %s\n", $geo_point->format;
$geo_point -> format('degree');