/ 
Geo-Local-Server-0.04
River stage zero No dependents
/ Geo::Local::Server

NAME

Geo::Local::Server - Returns the configured coordinates of the local server

SYNOPSIS

use Geo::Local::Server;
my $gls=Geo::Local::Server->new;
my ($lat, $lon)=$gls->latlon;

DESCRIPTION

Reads coordinates from either the user environment variable COORDINATES_WGS84_LON_LAT_HAE or the file /etc/local.coordinates.

USAGE

METHODS

lat

Returns the latitude.

lon

Returns the longitude

latlon, latlong

Returns a list of latitude, longitude

hae

Returns the configured height of above the ellipsoid

lonlathae

Returns a list of longitude, latitude and height of above the ellipsoid

PROPERTIES

env

Set and returns the name of the environment variable.

my $var=$gls->env; #default COORDINATES_WGS84_LON_LAT_HAE
$gls->env("");     #disable environment lookup
$gls->env(undef);  #reset to default

configfile

Sets and returns the location of the local.coordinates filename.

FORMAT

The local.coordinates file is a formatted INI file. The [wgs84] section is required for this package to function.

[main]
version=1

[wgs84]
latitude=38.780276
longitude=-77.386706
hae=63

Object Accessors

Config

Returns the Config::IniFiles object so that you can read additional information from the INI file.

my $config=$gls->Config; #isa Config::IniFiles

Example

my $version=$gls->Config->val("main", "version");

BUGS

Please log on RT and send an email to the author.

SUPPORT

DavisNetworks.com supports all Perl applications including this package.

AUTHOR

Michael R. Davis
CPAN ID: MRDVT
Satellite Tracking of People, LLC
mdavis@stopllc.com
http://www.stopllc.com/

COPYRIGHT

This program is free software licensed under the...

The BSD License

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

DateTime::Event::Sunrise