Branch Coverage

lib/Test/Device/SerialPort.pm
Criterion Covered Total %
branch 135 210 64.2


line true false branch
9 0 3 if ($^O eq 'MSWin32' or $^O eq 'cygwin') { }
11 0 0 if $@
142 0 2 if ($@)
145 2 0 if ($from_posix)
152 0 24 if ($^O eq 'MSWin32')
157 2 22 unless (defined $ms_per_tick)
175 15 11 if exists $Yes_resp{$choice}
182 2 25 if wantarray
183 6 19 if (ref $self) { }
184 2 4 if (@_) { }
188 0 4 unless nocarp()
193 1 18 if ($self =~ /Port/)
198 17 2 if ($self) { }
200 0 2 unless nocarp()
239 0 3 if ($^O eq 'MSWin32' and $$self{'_device'} =~ /^COM\d+$/io)
300 3 2 if (@_ and $testactive)
321 0 0 unless scalar @stat
329 0 0 unless @_
338 0 16 unless @_ == 1
342 8 8 if ($$self{'_fake_input'})
351 0 2 unless @_
354 0 2 unless (open CF, ">$filename")
369 0 0 unless @_
372 0 0 unless (open CF, "<$filename")
379 0 0 unless ($cfg_file_sig eq $signature)
385 0 0 unless $self
394 3 2 if (@_)
398 1 7 if ($re_next) { }
404 1 7 if ($pat eq '-re')
417 4 7 if ($baud)
418 2 2 unless exists $Bauds{$baud}
421 2 7 if (wantarray)
431 4 3 if (@_)
432 2 2 unless @_ == 2
436 3 2 wantarray ? :
505 0 2 $^O eq 'MSWin32' ? :
520 0 2 $^O eq 'MSWin32' ? :
580 0 2 $^O eq 'MSWin32' ? :
591 1 2 if (@_)
597 2 5 if (@_)
598 2 5 wantarray ? :
603 2 5 if (@_)
604 2 5 wantarray ? :
618 4 7 if ($databits)
619 2 2 unless exists $Databits{$databits}
622 2 7 if (wantarray)
632 10 5 if ($handshake)
633 2 8 unless exists $Handshakes{$handshake}
636 2 11 if (wantarray)
645 12 0 if ($$self{'_no_random_data'})
650 0 0 if (@_)
656 0 0 if ($count > 0)
666 0 0 unless (@patt)
671 0 0 if (rand 1 < 0.3)
676 0 0 unless $look
689 7 2 if (nocarp() and @_ == 1)
696 0 9 if @_
704 0 9 if @_
710 0 15 if @_
718 0 15 if (@_)
737 15 0 unless ($$self{'_LOOK'})
743 0 15 if ($size and $lenloc < $size)
747 12 3 if ($loc ne '')
751 3 28 if ($pat eq '-re')
756 3 25 if ($re_next) { }
11 14 elsif (($mpos = index($$self{'_LOOK'}, $pat)) > -1) { }
758 2 1 if ($$self{'_LOOK'} =~ /$pat/s)
762 2 0 if ($mpos) { }
763 1 1 if $best_pos and $mpos > $best_pos
782 10 1 if ($mpos) { }
783 0 10 if $best_pos and $mpos > $best_pos
803 9 2 if ($got_match)
827 0 6 $^O eq 'MSWin32' ? :
828 0 4 $^O eq 'MSWin32' ? :
829 0 5 $^O eq 'MSWin32' ? :
830 0 6 $^O eq 'MSWin32' ? :
849 0 2 if $$self{'_no_random_data'}
851 1 1 if rand 1 > 0.3
852 2 0 if rand 1 > 0.3
853 0 2 if rand 1 > 0.95
854 2 0 if rand 1 > 0.5
862 4 7 if ($parity)
863 2 2 unless exists $Parities{$parity}
866 2 7 if (wantarray)
875 2 0 if (@_)
878 0 2 wantarray ? :
902 0 2 if @_
909 0 2 if @_
918 0 2 if @_
940 0 0 if ($$self{'_no_random_data'})
944 0 0 unless ($size == $bytes)
956 0 0 if ($have_input > 0.7)
972 2 3 if (@_)
982 2 3 if (@_)
998 4 7 if ($stopbits)
999 2 2 unless exists $Stopbits{$stopbits}
1002 2 7 if (wantarray)
1030 0 0 unless @_ == 2
1034 0 0 unless $wbuf
1038 0 0 if ($f_char == 0) { }
0 0 elsif ($f_char == 195) { }
1077 2 2 if (@_)
1083 0 1 if (@_)
1090 2 5 if (@_)
1109 0 3 unless @_ == 2