| line |
true |
false |
branch |
|
152
|
3 |
3 |
if (overload::Overloaded($object) and overload::Method($object, '""') || overload::Method($object, '0+')) |
|
159
|
0 |
3 |
if ($error) { } |
|
170
|
2 |
136 |
if ($object->can($method)) |
|
173
|
0 |
2 |
if ($error) { } |
|
191
|
35 |
2 |
unless overload::Overloaded($object) |
|
208
|
2 |
222 |
if exists $attributes->{$method_string} |
|
209
|
26 |
196 |
if $seen_method_name{$method_string}++ |
|
210
|
1 |
195 |
if $method_string eq '__ANON__' |
|
211
|
40 |
155 |
substr($method_string, 0, 1) eq '_' ? : |
|
212
|
104 |
91 |
if ($package_string eq $class_name) { } |
|
213
|
13 |
91 |
unless $show_methods eq 'all' or $show_methods eq $type |
|
217
|
44 |
47 |
unless $show_inherited eq 'all' or $show_inherited eq $type |
|
223
|
3 |
1 |
unless $show_methods eq 'all' or $show_methods eq $type or $show_inherited eq 'all' or $show_inherited eq $type |
|
226
|
4 |
67 |
if ($ddp->class->format_inheritance eq 'string') { } |
|
228
|
3 |
1 |
if $ddp->class->sort_methods and @method_list |
|
232
|
3 |
1 |
if (@method_list) |
|
236
|
6 |
6 |
defined $methods{$type}{$_} ? : |
|
250
|
41 |
85 |
if (defined $pkg_name) { } |
|
260
|
39 |
28 |
if $ddp->class->sort_methods and @base_methods |
|
263
|
41 |
26 |
$total_methods ? : |
|
266
|
39 |
28 |
if (@base_methods) |
|
272
|
15 |
24 |
keys %lined_methods ? : |
|
278
|
22 |
0 |
if $ddp->class->sort_methods |
|
299
|
0 |
224 |
unless $subref |
|
301
|
0 |
224 |
unless $m and $m->isa('B::CV') |
|
303
|
0 |
224 |
unless $gv and not $gv->isa('B::Special') and $gv->NAME |
|
315
|
9 |
502 |
if substr($key, 0, 1) eq '(' |
|
316
|
224 |
278 |
if (ref \$namespace->{$key} ne 'GLOB' or defined *{$namespace->{$key};}{'CODE'}) |