Help for this page
#!/usr/bin/perl ... print join ' ', $t->timestamp, $t->lat, $t->lon, $t->alt; exit }
perl -MNet::GPSD3 -le '$g=Net::GPSD3->new;$g->addHandler(\&tpv);sub tp +v{$t=shift;return unless$t->class eq"TPV";print join" ",$t->timestamp +,$t->lat,$t->lon,$t->alt;exit}$g->watch'