blib/lib/Device/Modbus/TCP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 20 | 65.0 |
line | true | false | branch |
---|---|---|---|
20 | 7 | 19 | unless $bytes |
23 | 0 | 19 | unless $sock->connected |
33 | 2 | 13739 | if ($!{'EINTR'} or length $msg == 0) |
37 | 0 | 13741 | unless (defined $rc) |
61 | 0 | 3 | if (not defined $rc) |
66 | 0 | 0 | if ($_ =~ /timed out/) { } |
75 | 3 | 0 | if $attempts >= 5 or $rc == length $adu->binary_message |
90 | 2 | 16 | unless defined $self->{'buffer'} and length $self->{'buffer'} >= $bytes |
97 | 3 | 9 | if (defined $msg) |
99 | 3 | 0 | if defined $msg->{'unit'} |