| line |
true |
false |
branch |
|
21
|
13 |
0 |
if (not $json_ok) |
|
35
|
7 |
17 |
unless ($self->_file) |
|
58
|
26 |
0 |
if ($self->_file) { } |
|
61
|
1 |
25 |
unless open my $fh, '<', $fname |
|
66
|
0 |
25 |
unless close $fh |
|
75
|
0 |
0 |
if ($data->{'class'} eq 'POLL') |
|
82
|
0 |
25 |
unless defined $gps_json_data |
|
86
|
0 |
25 |
unless (defined $gps_perl_data->{'tpv'}[0]) |
|
92
|
1 |
24 |
if defined $args{'return'} and $args{'return'} eq 'json' |
|
98
|
65 |
1 |
if (defined $stat) |
|
99
|
1 |
64 |
unless defined $self->{'tpv'}{$stat} |
|
114
|
32 |
0 |
if @_ > 1 |
|
129
|
66 |
2 |
if (defined $sat_num) |
|
130
|
1 |
65 |
unless defined $self->{'satellites'}{$sat_num} |
|
133
|
65 |
2 |
if (defined $sat_num and defined $stat) |
|
134
|
13 |
52 |
unless defined $self->{'satellites'}{$sat_num}{$stat} |
|
148
|
1 |
26 |
unless (@_) |
|
155
|
22 |
4 |
unless $lat =~ /[NESW]$/ |
|
156
|
0 |
4 |
unless $lon =~ /[NESW]$/ |
|
176
|
1 |
7 |
unless (@_) |
|
182
|
0 |
7 |
if $lat =~ /[NESW]$/ |
|
183
|
0 |
7 |
if $lon =~ /[NESW]$/ |
|
185
|
2 |
5 |
if ($lat =~ /^-/) { } |
|
192
|
5 |
2 |
if ($lon =~ /^-/) { } |
|
206
|
5 |
20 |
if (not $self->_is_metric) |
|
216
|
18 |
115 |
if defined $file |
|
221
|
0 |
21 |
if defined $host |
|
222
|
7 |
14 |
unless defined $self->{'host'} |
|
228
|
9 |
47 |
if defined $metric |
|
229
|
22 |
34 |
unless defined $self->{'metric'} |
|
235
|
4 |
47 |
if defined $signed |
|
236
|
22 |
29 |
unless defined $self->{'signed'} |
|
241
|
0 |
21 |
if defined $port |
|
242
|
7 |
14 |
unless defined $self->{'port'} |
|
262
|
22 |
3 |
$self->_is_signed ? : |
|
271
|
150 |
175 |
$sat->{'used'} ? : |
|
279
|
0 |
24 |
if defined $status |
|
285
|
0 |
7 |
if $self->_file |
|
287
|
7 |
0 |
unless (defined $self->{'socket'}) |
|
296
|
7 |
0 |
unless defined $self->{'socket'} |
|
302
|
0 |
24 |
if $self->_is_socket |