line |
true |
false |
branch |
17
|
0 |
27 |
unless defined $thing |
20
|
4 |
23 |
if (@_ == 1) |
22
|
2 |
2 |
wantarray ? : |
25
|
0 |
23 |
unless defined $method |
29
|
1 |
22 |
if ($method =~ /^SUPER::/) { } |
36
|
9 |
14 |
if ($code) |
42
|
13 |
1 |
if (not $method =~ /::/) { } |
|
0 |
1 |
elsif (not $method =~ /SUPER::/) { } |
|
1 |
0 |
elsif ($method =~ /^SUPER::/) { } |
73
|
1 |
27 |
if ($super and $class eq $pkg) |
78
|
4 |
23 |
if (exists $heritage->{$pkg}) |
81
|
4 |
0 |
if ($code = $pkg2->can($method)) |
88
|
14 |
9 |
if (my $automethod = $automethods->{$pkg}) |
93
|
12 |
2 |
if (my($code, $ctype) = &$automethod($thing)) |
94
|
0 |
12 |
if (ref $code ne 'CODE') |
101
|
3 |
9 |
if (defined $ctype) |
103
|
3 |
0 |
if ($type and $type =~ /CUM/i) |
104
|
2 |
1 |
if ($code_type) { } |
106
|
0 |
2 |
$dir && $dir =~ /BOT/i ? : |
107
|
0 |
2 |
if ($code_type ne $type or $code_dir ne $dir) |
116
|
0 |
1 |
$dir && $dir =~ /BOT/i ? : |
121
|
0 |
0 |
if ($type and $type =~ /CHA/i) |
122
|
0 |
0 |
if ($code_type) { } |
124
|
0 |
0 |
$dir && $dir =~ /BOT/i ? : |
125
|
0 |
0 |
if ($code_type ne $type or $code_dir ne $dir) |
134
|
0 |
0 |
$dir && $dir =~ /BOT/i ? : |
146
|
0 |
9 |
if ($code_type) |
160
|
1 |
0 |
if ($code_type) |
161
|
0 |
1 |
$code_dir eq 'bottom up' ? : |
162
|
1 |
0 |
$code_type eq ':Cumulative' ? : |
176
|
0 |
161 |
unless defined $thing |
179
|
4 |
157 |
if (@_ == 1) |
184
|
0 |
157 |
unless defined $type |
187
|
49 |
108 |
if (my $isa = eval {
do {
$thing->Object::InsideOut::SUPER::isa($type)
}
}) |
193
|
31 |
124 |
if (exists $GBL->{'heritage'}{$pkg}) |
195
|
15 |
16 |
if (my $isa = $pkg->isa($type)) |