Free geo tigerline record b 0.02 software for linux

Geo::Track::Log is a Perl module that represent track logs and find a location based on a track log and a date.

SYNOPSIS

use Geo::Track::Log;
my $log = new Geo::Track::Log;

# add a point to a track log.
$log->addPoint( {
timestamp => 2004-12-25 12:00:00,
lat => 0.0,
long=> 0.0,
} );

$log->addPoint( {
timestamp => 2004-12-25 13:00:00,
lat => 0.0,
long=> 1.0,
} );

Get our location at a time
my ($pt, $sPt, $ePt) = $log->whereWasI(2004-12-25 12:30:00);
or (a synonym)
my ($pt, $sPt, $ePt) = $log->interpolate(2004-12-25 12:30:00);
(see DESCRIPTION for more)

Load tracklog from a Garnix format file
$log->loadTrackFromGarnix(file handle);

Load Waypoint from a Garnix format file
$log->loadWayFromGarnix(file handle);

Fix the funky Garnix line format
my $pt = $log->fixGarnixTrackLine ( qq( 44? 3 33.23" -123? 5 0.07" 148.0 WGS84 00:50:19-2004/07/12 [1];) )

Load a GPX (GPS XML) format file
$log->loadTrackFromGPX(file handle);

return the earliest point, by time
my $pt = $log->minTimeStamp();

return the latest point, by time
my $pt = $log->maxTimeStamp();

What percent of the way is time $d between the time at points $sPt and $dPt?
my $pct = $self->getPercent($d, $sPt, $ePt);

Geo::Shapelib is a Perl extension for reading and writing shapefiles as defined by ESRI.

SYNOPSIS

use Geo::Shapelib qw/:all/;
or
use Geo::Shapelib qw/:all/;

my $shapefile = new Geo::Shapelib {
Name => stations,
Shapetype => POINT,
FieldNames => [Name,Code,Founded];
FieldTypes => [String:50,String:10,Integer:8];
};

while ( ) {
chomp;
my($station,$code,$founded,$x,$y) = split /|/;
push @{$shapefile->{Shapes}},{ Vertices => [[$x,$y,0,0]] };
push @{$shapefile->{ShapeRecords}}, [$station,$code,$founded];
}

$shapefile->save();

This is a library for reading, creating, and writing shapefiles as defined by ESRI(r) using Perl. The Perl code uses Frank Warmerdams Shapefile C Library (http://shapelib.maptools.org/). The library is included in this distribution.

TechnoBar is an extension which provides the ultimate Technorati reverse browsing experience.

Techno(rati)Bar provides the ultimate "reverse" browsing experience by showing live Technorati content as sidebar on the web pages youre browsing.

TechnoBar will show blogs that link to the current site while browsing and open blogs by clicking on the sidebar entry.

Tie::FormA is a Perl module that can access a machine readable database file that minics a hardcopy form.

SYNOPSIS

require Tie::FormA;

#####
# Using support methods and file handle with
# the file subroutines such as open(), readline()
# print(), close()
#
tie *FORM_FILEHANDLE, Tie::FormA, @options
$form = tied *FORM_FILEHANDLE;

#####
# Using support methods only, no file subroutines
#
$form = Tie::Form->new(@options);

$encoded_fields = $form->decode_record($record);
@fields = $form->decode_field($encoded_fields);

$encoded_fields = $form->encode_field (@fields);
$record = $form->encode_record($encoded_fields);

$record = $form->get_record();

####
# Subroutine interface
#
$encoded_fields = decode_record($record);
@fields = decode_field($encoded_fields);

$encoded_fields = encode_field (@fields);
$record = encode_record($encoded_fields);
If a subroutine or method will process a list of options, @options, that subroutine will also process an array reference, @options, [@options], or hash reference, %options, {@options}.

The Tie::FormA module provides a text database file suitable for local data such as private mailing lists. The Tie::FormA cannot provide a data warehouse shared by mulitple users.

Geo::Ellipsoids is a package for standard Geo:: ellipsoid a, b, f and 1/f values.

SYNOPSIS

use Geo::Ellipsoids;
my $obj = Geo::Ellipsoids->new();
$obj->set(WGS84); #default
print "a=", $obj->a, "n";
print "b=", $obj->b, "n";
print "f=", $obj->f, "n";
print "i=", $obj->i, "n";
print "e=", $obj->e, "n";
print "n=", $obj->n(45), "n";

CONSTRUCTOR

new

The new() constructor may be called with any parameter that is appropriate to the set method.

my $obj = Geo::Ellipsoid->new();

METHODS

set

Method sets the current ellipsoid. This method is called when the object is constructed (default is WGS84).

$obj->set(); #default WGS84
$obj->set(Clarke 1866); #All built in ellipsoids are stored in meters
$obj->set({a=>1, b=>1}); #Custom Sphere 1 unit radius
list

Method returns a list of known elipsoid names.

my @list=$obj->list;

my $list=$obj->list;
while (@$list) {
print "$_n";
}
a

Method returns the value of the semi-major axis.

my $a=$obj->a;
b

Method returns the value of the semi-minor axis.

my $b=$obj->b; #b=a(1-f)
f

Method returns the value of flatting

my $f=$obj->f; #f=(a-b)/a
i

Method returns the value of the inverse flatting

my $i=$obj->i; #i=1/f=a/(a-b)
invf

Method synonym for the i method

my $i=$obj->invf; #i=1/f
e

Method returns the value of the first eccentricity, e. This is the eccentricity of the earths elliptical cross-section.

my $e=$obj->e;
e2

Method returns the value of eccentricity squared (e.g. e^2). This is not the second eccentricity, e or e-prime see the "ep" method.

my $e=sqrt($obj->e2); #e^2 = f(2-f) = 2f-f^2 = 1-b^2/a^2
ep

Method returns the value of the second eccentricity, e or e-prime. The second eccentricity is related to the first eccentricity by the equation: 1=(1-e^2)(1+e^2).

my $ep=$obj->ep;
ep2

Method returns the square of value of second eccentricity, e (e-prime). This is more useful in almost all equations.

my $ep=sqrt($obj->ep2); #ep2=(ea/b)^2=e2/(1-e2)=a^2/b^2-1
n

Method returns the value of n given latitude (degrees). Typically represented by the Greek letter nu, this is the radius of curvature of the ellipsoid perpendicular to the meridian plane. It is also the distance from the point in question to the polar axis, measured perpendicular to the ellipsoids surface.

my $n=$obj->n($lat);

Note: Some define a variable n as (a-b)/(a+b) this is not that variable.

n_rad

Method returns the value of n given latitude (radians).

my $n=$obj->n_rad($lat);
rho

rho is the radius of curvature of the earth in the meridian plane.

my $rho=$obj->rho($lat);
rho_rad

rho is the radius of curvature of the earth in the meridian plane.

my $rho=$obj->rho_rad($lat);
polar_circumference

Method returns the value of the semi-minor axis times 2*PI.

my $polar_circumference=$obj->polar_circumference;
equatorial_circumference

Method returns the value of the semi-major axis times 2*PI.

my $equatorial_circumference=$obj->equatorial_circumference;
shortname

Method returns the shortname, which is the hash key, of the current ellipsoid

my $shortname=$obj->shortname;
longname

Method returns the long name of the current ellipsoid

my $longname=$obj->longname;
data

Method returns a hash reference for the ellipsoid definition data structure.

my $datastructure=$obj->data;
name2ref

Method returns a hash reference (e.g. {a=>6378137,i=>298.257223563}) when passed a valid ellipsoid name (e.g. WGS84).

my $ref=$obj->name2ref(WGS84)

Geo::Raster is a Perl extension for raster algebra.

SYNOPSIS

use Geo::Raster;
or
use Geo::Raster qw(:types);
or
use Geo::Raster qw(:types :logics :db);

Geo::Raster is an object-oriented interface to libral, a C library for rasters and raster algebra. Geo::Raster makes using libral easy and adds some very useful functionality to it. libral rasters are in-memory for fast and easy processing. libral rasters can be created from GDAL rasters. GDAL provides access to rasters in many formats.

Geo::Raster also adds the required functionality to display rasters in Gtk2::Ex::Geo.

Each cell in raster/grid is assumed to be a square.

The grid point represents the center of the cell and not the area of the cell (when such distinction needs to be made). TODO: This needs more attention.

A grid is indexed like this:

j = 0..N-1
------------------>
.
i = 0..M-1 .
.
.
V
there is also a (x,y) world coordinate system
maxY ^
.
.
y .
minY .
------------------>
minX maxX
x

minX is the left edge of first cell in line. maxX is the right edge of the last cell in a line. minY and maxY represent similarly the boundaries of the raster.