Branch Coverage

blib/lib/Data/Clean.pm
Criterion Covered Total %
branch 33 54 61.1


line true false branch
26 0 9 unless $cd->{'clone_func'} =~ /(.+)::(.+)/
30 0 9 if $@
38 1 0 unless $mn =~ /\A\w+\z/
45 1 1 unless $fn =~ /\A\w+(::\w+)*\z/
157 0 11 if $opts->{'!debug'}
159 11 0 unless ($cd->{'clone_func'})
164 0 11 unless $cd->{'clone_func'} =~ /(.+)::(.+)/
173 28 2 if ($which eq 'if' or $which eq 'new_if') { }
180 0 0 unless (@{$_->[0];})
0 84 if ($opts->{'!debug'})
181 30 54 $n && $which ne 'new_if' ? :
211 3 8 if ($circ)
213 0 3 unless $self->can($meth)
216 0 3 if ($opts->{'!debug'})
223 0 3 unless $o
225 0 3 unless $self->can($meth)
234 5 6 unless $o
236 0 6 unless $self->can($meth)
242 2 7 if ($opts->{'!recurse_obj'}) { }
254 9 0 unless $o
256 0 0 unless $self->can($meth)
268 3 6 if $circ
269 3 6 if $circ
282 3 6 if $circ
288 0 9 if $opts->{'!debug'}
294 0 9 if ($ENV{'LOG_CLEANSER_CODE'} and log_is_trace())
297 0 0 $ENV{'LINENUM'} // 1 ? :