Select Code to Download

#! /usr/bin/perl
...

print "V = $v\tLatitude = $in1\nH = $h\tLongitude = $in2\n\n";

#! /usr/bin/perl

...
use Geo::Coordinates::VandH::XS;
my( $v, $h ) = Geo::Coordinates::VandH::XS::toVH( $lat, $lon );
print "V = $v\tLatitude = $lat\nH = $h\tLongitude = $lon\n\n";

#! /usr/bin/perl

...
$blah=new Geo::Coordinates::VandH;
($lat,$lon) = $blah->vh2ll($v,$h);
print "V = $v\tLatitude = $lat\nH = $h\tLongitude = $lon\n\n";