view release on metacpan or  search on metacpan

lib/BT368i/NMEA/GP/GLL.pm  view on Meta::CPAN

	# 1) Latitude, ddmm.mm format
	$self->{latitude} = $args[1];

	# 2) Latitude hemisphere, N or S
	$self->{latitude_hemisphere} = $args[2];

	# 3) Longitude, dddmm.mm format
	$self->{longitude} = $args[3];

	# 4) Longitude hemisphere, E or W
	$self->{longitude_hemisphere} = $args[4];

	# 5) UTC time of position fix, hhmmss format
	my @utc_time = split(//, $args[5]);
	my $hh = $utc_time[0];
	$hh .= $utc_time[1];
	my $mm = $utc_time[2];
	$mm .= $utc_time[3];
	my $ss = $utc_time[4];
	$ss .= $utc_time[5];
	my $ms = $utc_time[7];
	$ms .= $utc_time[8];
	$ms .= $utc_time[9];
	$self->{utc_time} = $hh . ':' . $mm . ':' . $ss . '.' . $ms;

	# 6) Data valid, A=Valid
	$self->{data_valid} = $args[6];
}

1;

__END__
=head1 NAME

BT368i::NMEA::GP::GLL - The GLL sentance

=head1 SYNOPSIS

use BT368i::NMEA::GP::GLL;

my $gll = new BT368i::NMEA::GP::GLL();

$gll->parse();

$gll->print();

=head1 DESCRIPTION

Used to decode the GLL message.

=head2 Methods

=over 2

=item $gll->parse();

Parse a GPGLL sentance.

=item $gll->print();

Print a decoded output of a GPGLL sentance.

=item $gll->log($filename);

Log the GPGLL sentance to a file.

=back

=head1 AUTHOR

Travis Kent Beste, travis@tencorners.com

=head1 COPYRIGHT

Copyright 2010 Tencorners, LLC.  All rights reserved.

This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.

=head1 SEE ALSO

Travis Kent Beste's GPS www site
http://www.travisbeste.com/software/gps

perl(1).

RingBuffer.pm.

Device::SerialPort.pm.

=cut