line |
true |
false |
branch |
29
|
103 |
0 |
if UNIVERSAL::isa($_[0], 'DDC::Any') |
30
|
5 |
98 |
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
|
649 |
8019 |
if ($ignore and "${src}::$src_sym" =~ /$ignore/) |
92
|
737 |
7282 |
if ($deep and $src_sym =~ /::$/) { } |
|
726 |
6556 |
elsif ($src_sym eq 'ISA') { } |
108
|
0 |
748 |
if ($inherit > 0) { } |
|
748 |
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 |