Net::GPSD::Satellite - Provides an interface for a gps satellite object.
use Net::GPSD; my $obj=Net::GPSD->new(); my $i=0; print join("\t", qw{Count PRN ELEV Azim SNR USED}), "\n"; foreach ($obj->getsatellitelist) { print join "\t", ++$i, $_->prn, $_->elev, $_->azim, $_->snr, $_->used; $_->oid; print "\n"; }
or to construct a satelite object
use Net::GPSD::Satelite; my $obj=Net::GPSD::Satellite->new(22,80,79,35,1);
or to create a satelite object
use Net::GPSD::Satelite; my $obj=Net::GPSD::Satellite->new(); $obj->prn(22), $obj->elev(80), $obj->azim(79), $obj->snr(35), $obj->used(1);
my $obj=Net::GPSD::Satellite->new($prn,$elev,$azim,$snr,$used);
Returns the Satellite PRN number.
$obj->prn(22); my $prn=$obj->prn;
Returns the Satellite Object ID from the GPS::OID package.
$obj->oid(22216); my $oid=$obj->oid;
Returns the satellite elevation, 0 to 90 degrees.
$obj->elev(80); my $elev=$obj->elev;
Returns the satellite azimuth, 0 to 359 degrees.
$obj->azim(79); my $azim=$obj->azim;
Returns the Signal to Noise ratio (C/No) 00 to 99 dB, null when not tracking.
$obj->snr(35); my $snr=$obj->snr;
Returns a 1 or 0 according to if the satellite was or was not used in the last fix.
$obj->used(1); my $used=$obj->used;
Email author and submit to RT.
DavisNetworks.com supports all Perl applications including this package.
Michael R. Davis, qw/gpsd 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.
To install Net::GPSD, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::GPSD
CPAN shell
perl -MCPAN -e shell install Net::GPSD
For more information on module installation, please visit the detailed CPAN module installation guide.