File Coverage

blib/lib/Net/GPSD3/Return/Unknown.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 3 3 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1             package Net::GPSD3::Return::Unknown;
2 12     12   63 use strict;
  12         23  
  12         394  
3 12     12   171 use warnings;
  12         19  
  12         402  
4 12     12   57 use base qw{Net::GPSD3::Base};
  12         15  
  12         2005  
5              
6             our $VERSION='0.12';
7              
8             =head1 NAME
9              
10             Net::GPSD3::Return::Unknown - Net::GPSD3 Return Base Class
11              
12             =head1 SYNOPSIS
13              
14             use base qw{Net::GPSD3::Return::Unknown};
15              
16             =head1 DESCRIPTION
17              
18             Provides the base Perl object interface to all objects returned by the GPSD daemon. This class is also used if the class is unknown.
19              
20             =head1 METHODS
21              
22             =head2 parent
23              
24             Returns the parent Net::GPSD3 object
25              
26             =cut
27              
28 95     95 1 7959 sub parent {shift->{"parent"}};
29              
30             =head2 class
31              
32             Returns the class string for the particular JSON message. Classes in all upper case are from gpsd. Classes with initial capital letter are from this Perl package. Class in all lower case are currently reserved. Private extension classes should use camel case.
33              
34             =cut
35              
36 13     13 1 1324 sub class {shift->{"class"}};
37              
38             =head2 string
39              
40             This is the JSON string as passed over the TCP connection.
41              
42             =cut
43              
44 11     11 1 62 sub string {shift->{"string"}};
45              
46             =head1 BUGS
47              
48             Log on RT and Send to gpsd-dev email list
49              
50             =head1 SUPPORT
51              
52             DavisNetworks.com supports all Perl applications including this package.
53              
54             Try gpsd-dev email list
55              
56             =head1 AUTHOR
57              
58             Michael R. Davis
59             CPAN ID: MRDVT
60             STOP, LLC
61             domain=>michaelrdavis,tld=>com,account=>perl
62             http://www.stopllc.com/
63              
64             =head1 COPYRIGHT
65              
66             This program is free software licensed under the...
67              
68             The BSD License
69              
70             The full text of the license can be found in the LICENSE file included with this module.
71              
72             =head1 SEE ALSO
73              
74             L, L
75              
76             =cut
77              
78             1;