| Geo::Functions(3pm) | User Contributed Perl Documentation | Geo::Functions(3pm) |
Geo::Functions - Package for standard Geo:: functions.
use Geo::Functions qw{deg_rad deg_dms rad_deg}; #import into namespace
print "Degrees: ", deg_rad(3.14/4), "\n";
use Geo::Functions;
my $obj = Geo::Functions->new;
print "Degrees: ", $obj->deg_rad(3.14/2), "\n";
Function naming convention is "format of the return" underscore "format of the parameters." For example, you can read the deg_rad function as "degrees given radians" or "degrees from radians".
The new() constructor
my $obj = Geo::Functions->new();
Degrees given degrees minutes seconds.
my $deg=deg_dms(39, 29, 17.134); my $deg=deg_dms(39, 29, 17.134, 'N');
Degrees given radians.
my $deg=deg_rad(3.14);
Radians given degrees.
my $rad=rad_deg(90);
Radians given degrees minutes seconds.
my $rad=rad_dms(45 30 20.0);
Round to the nearest integer. This formula rounds toward +/- infinity.
my $int=round(42.2);
Degrees minutes seconds given degrees.
my ($d, $m, $s, $sign)=dms_deg($degrees, qw{N S});
my ($d, $m, $s, $sign)=dms_deg($degrees, qw{E W});
Degrees minutes given degrees.
my ($d, $m, $sign)=dm_deg($degrees, qw{N S});
my ($d, $m, $sign)=dm_deg($degrees, qw{E W});
meters per second given knots
my $mps=mps_knots(50.0);
knots given meters per second
my $knots=knots_mps(25.0);
Please send to the geo-perl email list.
Michael R. Davis qw/perl michaelrdavis com/
Copyright (c) 2006 Michael R. Davis (mrdvt92)
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Geo::Constants Geo::Ellipsoids
| 2021-01-06 | perl v5.32.0 |