Net::GPSD3::Cache - Net::GPSD3 caching object

Net-GPSD3 documentation Contained in the Net-GPSD3 distribution.

Index

Code Index:

NAME

Top

Net::GPSD3::Cache - Net::GPSD3 caching object

SYNOPSIS

Top

  use Net::GPSD3;
  my $cache=Net::GPSD3->cache; #isa Net::GPSD3::Cache
  $cache->add($obj);           #obj isa Net::GPSD3::Return::XXX

DESCRIPTION

Top

METHODS

Top

add

Adds an object to the cache.

TPV

Returns the last Net::GPSD3::Return::TPV object reported by gpsd.

SKY

Returns the last Net::GPSD3::Return::SKY object reported by gpsd.

DEVICES

Returns the last Net::GPSD3::Return::DEVICES object reported by gpsd.

VERSION

Returns the last Net::GPSD3::Return::VERSION object reported by gpsd.

ERROR

Returns the last Net::GPSD3::Return::ERROR object reported by gpsd.

WATCH

Returns the last Net::GPSD3::Return::WATCH object reported by gpsd.

SUBFRAME

Returns the last Net::GPSD3::Return::SUBFRAME object reported by gpsd.

BUGS

Top

Log on RT and Send to gpsd-dev email list

SUPPORT

Top

DavisNetworks.com supports all Perl applications including this package.

Try gpsd-dev email list

AUTHOR

Top

  Michael R. Davis
  CPAN ID: MRDVT
  STOP, LLC
  domain=>michaelrdavis,tld=>com,account=>perl
  http://www.stopllc.com/

COPYRIGHT

Top

This program is free software licensed under the...

  The BSD License

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

Top

Net::GPSD3

Net-GPSD3 documentation Contained in the Net-GPSD3 distribution. 
package Net::GPSD3::Cache;
use strict;
use warnings;
use base qw{Net::GPSD3::Base};

our $VERSION='0.12';


sub add {
  my $self=shift;
  my $obj=shift;
  if ($obj->can("class") and $self->can($obj->class)) {
    $self->{$obj->class}=$obj; 
  }
  return $self;
}


sub TPV {shift->{"TPV"}};


sub SKY {shift->{"SKY"}};


sub DEVICES {shift->{"DEVICES"}};


sub VERSION {shift->{"VERSION"}};


sub ERROR {shift->{"ERROR"}};


sub WATCH {shift->{"WATCH"}};


sub SUBFRAME {shift->{"SUBFRAME"}};


1;