| line |
true |
false |
branch |
|
45
|
0 |
0 |
unless $$self{'quiet'} |
|
61
|
0 |
1 |
ref $_ eq 'HASH' ? : |
|
73
|
0 |
0 |
$onWindows ? : |
|
|
1 |
0 |
$TEST ? : |
|
|
0 |
1 |
unless my $port = $TEST ? 'Test::Device::SerialPort'->new($port_str, 'debug', $debug) : ($onWindows ? 'Win32::SerialPort'->new($port_str, 'debug', $debug) : 'Device::SerialPort'->new($port_str, 'debug', $debug)) |
|
90
|
0 |
1 |
unless $port->write_settings |
|
111
|
0 |
0 |
if defined $raw |
|
117
|
25 |
0 |
unless defined $address |
|
121
|
42 |
108 |
defined $args[$_] ? : |
|
133
|
0 |
25 |
if $try > 1 and $$self{'backoff'} |
|
136
|
0 |
25 |
if $$self{'debug'} |
|
138
|
0 |
25 |
unless defined $sent and $sent == 10 |
|
142
|
0 |
25 |
if $$self{'debug'} |
|
143
|
0 |
25 |
unless defined $read and length $read == 8 |
|
150
|
0 |
25 |
unless crc(substr($read, 0, 6)) == $reply_crc |
|
152
|
25 |
0 |
wantarray ? : |
|
162
|
3 |
33 |
if (ref $matrix eq 'HASH' and defined $$matrix{$input}) { } |
|
|
33 |
0 |
elsif (ref $matrix eq 'ARRAY' and defined $$matrix[$input]) { } |
|
179
|
0 |
23 |
if $$self{'debug'} |
|
182
|
23 |
0 |
if $input == 0 |
|
194
|
1421 |
1379 |
$crc & 1 ^ $data & 1 ? : |
|
210
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
212
|
0 |
1 |
if $$self{'debug'} |
|
222
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
230
|
0 |
1 |
wantarray ? : |
|
232
|
0 |
0 |
wantarray ? : |
|
239
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
241
|
0 |
1 |
wantarray ? : |
|
243
|
0 |
0 |
wantarray ? : |
|
266
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
267
|
0 |
1 |
$reply[4] == 84 ? : |
|
|
0 |
1 |
$reply[5] == 87 ? : |
|
273
|
0 |
1 |
wantarray ? : |
|
275
|
0 |
0 |
wantarray ? : |
|
282
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
288
|
0 |
1 |
wantarray ? : |
|
290
|
0 |
0 |
wantarray ? : |
|
297
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
308
|
1 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
310
|
0 |
1 |
wantarray ? : |
|
312
|
0 |
0 |
wantarray ? : |
|
319
|
6 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
323
|
0 |
6 |
$$self{'raw'} ? : |
|
339
|
10 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
343
|
0 |
10 |
$$self{'raw'} ? : |
|
363
|
0 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
367
|
0 |
0 |
$$self{'raw'} ? : |
|
376
|
0 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
380
|
0 |
0 |
$$self{'raw'} ? : |
|
394
|
0 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
404
|
0 |
0 |
if (@reply and $self->transmissionCheck($reply[0])) |
|
408
|
0 |
0 |
$$self{'raw'} ? : |