| line |
true |
false |
branch |
|
43
|
0 |
0 |
unless my $port = 'Device::SerialPort'->new($device) |
|
68
|
0 |
0 |
if ($count > 0) { } |
|
71
|
0 |
0 |
if $chars |
|
109
|
0 |
0 |
ref $text eq 'ARRAY' ? : |
|
126
|
0 |
0 |
$pct > 1 ? : |
|
151
|
0 |
0 |
unless $ascii <= 7 and $ascii >= 0 |
|
152
|
0 |
0 |
ref $data[0] eq 'ARRAY' ? : |
|
153
|
0 |
0 |
unless scalar @data == 8 |
|
160
|
0 |
0 |
unless $ascii >= 0 and $ascii <= 7 |
|
167
|
0 |
0 |
unless ref $line eq 'ARRAY' |
|
170
|
0 |
0 |
if lc $line[$i] eq 'x' |
|
184
|
0 |
0 |
if ($val == 0) { } |
|
|
0 |
0 |
elsif ($val <= 8) { } |
|
194
|
0 |
0 |
if ($val == 0) { } |
|
|
0 |
0 |
elsif ($val <= 8) { } |
|
|
0 |
0 |
elsif ($val <= 16) { } |