line |
true |
false |
branch |
23
|
2 |
33 |
if ($class =~ /::SUPER$/) |
35
|
2 |
71 |
if ($super and $class eq $pkg) |
40
|
9 |
62 |
if (exists $heritage->{$pkg}) |
43
|
8 |
1 |
if (&Scalar::Util::blessed($thing)) { } |
44
|
4 |
4 |
if (exists $$objects{$$thing}) { } |
47
|
4 |
0 |
if (my $code = $obj->can($method)) |
56
|
4 |
0 |
if (my $code = $pkg->can($method)) |
65
|
1 |
0 |
if (my $code = $pkg->can($method)) |
75
|
41 |
21 |
if (my $automethod = $automethods->{$pkg}) |
80
|
31 |
10 |
if (my($code, $ctype) = &$automethod(@_)) |
81
|
1 |
30 |
if (ref $code ne 'CODE') |
91
|
15 |
15 |
if (defined $ctype) |
93
|
9 |
6 |
if ($type and $type =~ /CUM/i) |
94
|
5 |
4 |
if ($code_type) { } |
96
|
2 |
3 |
$dir && $dir =~ /BOT/i ? : |
97
|
0 |
5 |
if ($code_type ne $type or $code_dir ne $dir) |
106
|
1 |
3 |
$dir && $dir =~ /BOT/i ? : |
111
|
6 |
0 |
if ($type and $type =~ /CHA/i) |
112
|
3 |
3 |
if ($code_type) { } |
114
|
3 |
0 |
$dir && $dir =~ /BOT/i ? : |
115
|
0 |
3 |
if ($code_type ne $type or $code_dir ne $dir) |
124
|
3 |
0 |
$dir && $dir =~ /BOT/i ? : |
136
|
0 |
15 |
if ($code_type) |
151
|
7 |
3 |
if ($code_type) |
152
|
4 |
3 |
$code_dir eq 'bottom up' ? : |
153
|
4 |
3 |
$code_type eq ':Cumulative' ? : |
161
|
3 |
0 |
ref $thing ? : |