![]() |
![]()
| ![]() |
![]()
NAMEGPS::NMEA - Perl interface to GPS equipment using the NMEA Protocol SYNOPSISuse GPS::NMEA; $gps = new GPS::NMEA( 'Port' => '/dev/ttyS0', 'Baud' => 9600, ); DESCRIPTIONGPS::NMEA allows the connection and use of of a GPS receiver in perl scripts. Note that latitudes and longitudes are in DMM format. GETTING STARTEDKNOWN LIMITATIONSBUGSEXAMPLESGet the position periodically: #!/usr/bin/perl use GPS::NMEA; my $gps = GPS::NMEA->new(Port => '/dev/cuaa0', # or COM5: or /dev/ttyS0 Baud => 4800); while(1) { my($ns,$lat,$ew,$lon) = $gps->get_position; print "($ns,$lat,$ew,$lon)\n"; } Get the internal NMEA dump: #!/usr/bin/perl use GPS::NMEA; use Data::Dumper; my $gps = GPS::NMEA->new(Port => '/dev/cuaa0', # or COM5: or /dev/ttyS0 Baud => 4800); while(1) { $gps->parse; # Dump internal NMEA data: $gps->nmea_data_dump; # Alternative to look at the internal NMEA data: require Data::Dumper; print Data::Dumper->new([$gps->{NMEADATA}],[])->Indent(1)->Useqq(1)->Dump; } __END__ AUTHORJoao Pedro B Gonçalves , joaop@iscsp.utl.pt SEE ALSOPOD ERRORSHey! The above document had some coding errors, which are explained below:
|