Branch Coverage

blib/lib/MBclient.pm
Criterion Covered Total %
branch 0 128 0.0


line true false branch
142 0 0 unless defined $hostname
144 0 0 if ($hostname =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ or $hostname =~ /^[a-z][a-z0-9\.\-]+$/)
159 0 0 unless defined $port
161 0 0 if ($port =~ /^\d{1,5}$/ and $port < 65536)
176 0 0 unless defined $uid
178 0 0 if ($uid =~ /^\d{1,3}$/)
192 0 0 unless defined $mode
204 0 0 if $$self{'debug'}
206 0 0 if $self->is_open
209 0 0 unless ($ad_ip)
211 0 0 if $$self{'debug'}
217 0 0 if ($connect_ok) { }
222 0 0 if $$self{'debug'}
242 0 0 if ($$self{'sock'}) { }
266 0 0 unless $s_send
270 0 0 unless $f_body
294 0 0 unless $s_send
298 0 0 unless $f_body
323 0 0 unless $s_send
327 0 0 unless $f_body
350 0 0 unless $s_send
354 0 0 unless $f_body
373 0 0 $bit_value ? :
378 0 0 unless $s_send
382 0 0 unless $f_body
386 0 0 $rx_bit_addr == $bit_addr && $rx_bit_value == $bit_value ? :
404 0 0 unless $s_send
408 0 0 unless $f_body
412 0 0 $rx_reg_addr == $reg_addr && $rx_reg_value == $reg_value ? :
439 0 0 unless $s_send
443 0 0 unless $f_body
447 0 0 $rx_reg_addr == $reg_addr ? :
460 0 0 if ($$self{'MODE'} == 1) { }
0 0 elsif ($$self{'MODE'} == 2) { }
487 0 0 unless $bytes_send
489 0 0 if $$self{'debug'}
504 0 0 if ($$self{'MODE'} == 1) { }
0 0 elsif ($$self{'MODE'} == 2) { }
507 0 0 unless $rx_buffer
512 0 0 unless ($rx_hd_tr_id == $$self{'hd_tr_id'} and $rx_hd_pr_id == 0 and $rx_hd_length < 256 and $rx_hd_unit_id == $$self{'UNIT_ID'})
519 0 0 unless $rx_buffer
522 0 0 if $$self{'debug'}
528 0 0 unless $rx_buffer
531 0 0 if $$self{'debug'}
533 0 0 if (&bytes::length($rx_frame) < 5)
535 0 0 if $$self{'debug'}
540 0 0 unless ($self->_crc_is_ok($rx_frame))
542 0 0 if $$self{'debug'}
551 0 0 unless ($rx_unit_id == $$self{'UNIT_ID'})
557 0 0 if ($rx_bd_fc > 128) { }
562 0 0 if $$self{'debug'}
578 0 0 unless ($self->is_open)
579 0 0 if $$self{'debug'}
580 0 0 unless $self->open
586 0 0 if ($send_l != $data_l) { }
588 0 0 if $$self{'debug'}
604 0 0 unless ($self->_can_read)
611 0 0 unless (defined $s_recv)
613 0 0 if $$self{'debug'}
626 0 0 if ($_select) { }
630 0 0 if $$self{'debug'}
650 0 0 if $lsb
682 0 0 if ($$self{'MODE'} == 1) { }
0 0 elsif ($$self{'MODE'} == 2) { }