Branch Coverage

blib/lib/DDC/Any.pm
Criterion Covered Total %
branch 34 54 62.9


line true false branch
29 97 0 if UNIVERSAL::isa($_[0], 'DDC::Any')
30 5 92 unless $COMPILER
37 0 2 unless defined $WHICH
61 12 0 if UNIVERSAL::isa($_[0], 'DDC::Any')
62 12 0 unless $INC{'DDC/XS.pm'}
63 12 0 unless $INC{'DDC/XS.pm'}
77 11 0 exists $opts{'deep'} ? :
79 0 11 unless ref $ignore
88 638 7876 if ($ignore and "${src}::$src_sym" =~ /$ignore/)
92 726 7150 if ($deep and $src_sym =~ /::$/) { }
715 6435 elsif ($src_sym eq 'ISA') { }
108 0 737 if ($inherit > 0) { }
737 0 elsif ($inherit < 0) { }
130 11 0 if (/^:(\S+)$/i)
132 4 7 if exists $alias{$which}
137 11 7 if ($which)
138 7 4 if $which eq 'none'
139 0 4 if ($WHICH)
140 0 0 if $WHICH ne $which
151 7 4 if (not $which or $which eq 'DDC::XS')
152 7 0 if (not $that->have_xs) { }
153 0 7 if ($which || '') eq 'DDC::XS'
158 11 0 if (not $which or $which eq 'DDC::PP')
159 10 1 unless $INC{'DDC/PP.pm'}
160 0 11 if (not $INC{'DDC/PP.pm'}) { }
161 0 0 if ($which || '') eq 'DDC::PP'
166 0 11 unless $which