Branch Coverage

blib/lib/Net/IMP/Base.pm
Criterion Covered Total %
branch 17 60 28.3


line true false branch
41 18 1 if (defined $v) { }
57 0 57 if exists $cfg{$k}
58 54 3 if defined $v
68 0 46 %cfg ? :
88 41 33 if $cb
98 0 0 unless my($if) = $factory->get_interface($want)
103 0 0 %ignore ? :
105 0 0 if (my $adaptor = $if->[2]) { }
120 0 0 unless @_
128 0 0 if ($lin and $lin != $in)
134 0 0 if (not $out && @$out) { }
144 0 0 if (%lout)
151 0 0 if ($adaptor)
153 0 0 unless (eval "require $adaptor")
176 74 0 $sub ? :
177 74 0 if $analyzer->{'analyzer_rv'}
193 0 0 if ($busy) { }
0 0 elsif (not $analyzer->{'busy'} && $analyzer->{'busy'}[$dir]) { }
195 0 0 if $analyzer->{'busy'} and $analyzer->{'busy'}[$dir]
203 0 0 unless (grep {$_;} @{$$analyzer{'busy'};})
221 0 0 if (my $ignore = $analyzer->{'ignore_rv'}) { }
237 252 74 if (@_)
239 0 252 if (my $ignore = $analyzer->{'ignore_rv'}) { }
245 326 0 if (my $cb = $analyzer->{'analyzer_cb'})
247 0 326 if (my $busy = $analyzer->{'busy'}) { }
252 74 elsif (@$rv) { }
251 0 0 if (my $lvl = $important{$_->[0] + 0}) { }
0 0 elsif ($$busy[$_->[1]]) { }
261 0 0 if @important
263 0 0 if (@nobusy or @important) { }