| line |
true |
false |
branch |
|
63
|
1 |
1 |
ref $self->command eq 'ARRAY' ? : |
|
74
|
1 |
1 |
unless ref $self->command eq 'ARRAY' |
|
93
|
1 |
26 |
if (scalar @args == 1) { } |
|
107
|
12 |
72 |
if (defined $short_attributes{$k}) { } |
|
|
29 |
43 |
elsif (grep {$k eq $short_attributes{$_};} keys %short_attributes) { } |
|
|
18 |
25 |
elsif (grep {$_ eq $k;} @long_attributes) { } |
|
108
|
0 |
12 |
if $long |
|
113
|
0 |
29 |
if $short |
|
118
|
24 |
1 |
if ($k eq 'original_json') { } |
|
134
|
1 |
25 |
if (keys %orig < 2) |
|
141
|
1 |
24 |
if (defined $attr{'ok'} and $attr{'ok'} != 1) |
|
148
|
4 |
20 |
if (defined $attr{'data'}) |
|
149
|
0 |
4 |
unless ref $attr{'data'} eq 'ARRAY' |
|
151
|
1 |
5 |
unless ref $data_set eq 'ARRAY' |
|
152
|
1 |
4 |
unless scalar @{$data_set;} |
|
159
|
1 |
21 |
if (defined $attr{'error_code'}) |
|
160
|
1 |
0 |
unless $attr{'error_code'} > 0 |
|
166
|
6 |
15 |
if ($checksum) |
|
168
|
1 |
5 |
unless ($calced_checksum == $checksum) |
|
179
|
22 |
0 |
if $_ ne 'checksum' |
|
187
|
3 |
25 |
if (ref $value eq 'ARRAY') |
|
229
|
3 |
60 |
$self->can('has_' . $_)->($self) ? : |
|
231
|
63 |
6 |
if $_ ne 'unit' and $_ ne 'checksum' |
|
245
|
2 |
40 |
$self->can('has_' . $_)->($self) ? : |
|
248
|
42 |
4 |
if $_ ne 'unit' and $_ ne 'checksum' |
|
254
|
0 |
42 |
if ($short_data{$short_attributes{$k}}) |
|
295
|
1 |
2 |
if (ref $parsed[0]) { } |
|
|
1 |
1 |
elsif (scalar @parsed == 1) { } |
|
310
|
1 |
14 |
defined $current ? : |
|
313
|
1 |
14 |
if $start == -1 |
|
315
|
4 |
10 |
if $end == -1 |
|
318
|
9 |
1 |
if ($another_start == -1) { } |
|
319
|
4 |
5 |
$start == 0 ? : |
|
326
|
0 |
1 |
if defined $current and $another_start == $current |
|
335
|
9 |
5 |
if (@parse_first) { } |
|
337
|
5 |
4 |
if $pre and length $pre |
|
342
|
2 |
7 |
if ($@) |
|
349
|
2 |
6 |
$one ? : |
|
|
8 |
1 |
if $post and length $post |
|
362
|
0 |
1 |
$self->has_checksum ? : |
|
374
|
1 |
0 |
$self->has_checksum ? : |