diff --git a/tools/pos2nmea.pl b/tools/pos2nmea.pl index b5238b3..4d71cdb 100755 --- a/tools/pos2nmea.pl +++ b/tools/pos2nmea.pl @@ -56,9 +56,9 @@ while ($line = <$fpi>) { print STDERR $line; ## entweder: alle Zeilen ausgeben if ( ($line =~ /(\d\d):(\d\d):(\d\d\.?\d?\d?\d?).*\ +lat:\ *(-?\d*)(\.\d*)\ +lon:\ *(-?\d*)(\.\d*)\ +alt:\ *(-?\d*\.\d*).*/) + or ($line =~ /(\d\d):(\d\d):(\d\d\.?\d?\d?\d?).* lat:\ *(-?\d*)(\.\d*).* lon:\ *(-?\d*)(\.\d*).* alt:\ *(-?\d*\.\d*).*/) or ($line =~ /\((\d\d):(\d\d):(\d\d)\)\ +lat:\ *(-?\d*)(\.\d*)°\ +lon:\ *(-?\d*)(\.\d*)°\ +alt:\ *(-?\d*)m.*/) ) # imet1rs { - #print STDERR $line; ## oder: nur Zeile mit Koordinaten ausgeben $hms = $1*10000+$2*100+$3;