| line |
true |
false |
branch |
|
193
|
3 |
3 |
if (overload::Overloaded($object) and overload::Method($object, '""') || overload::Method($object, '0+')) |
|
200
|
0 |
3 |
if ($error) { } |
|
211
|
2 |
136 |
if ($object->can($method)) |
|
214
|
0 |
2 |
if ($error) { } |
|
232
|
35 |
2 |
unless overload::Overloaded($object) |
|
249
|
2 |
222 |
if exists $attributes->{$method_string} |
|
250
|
26 |
196 |
if $seen_method_name{$method_string}++ |
|
251
|
1 |
195 |
if $method_string eq "__ANON__" |
|
252
|
40 |
155 |
substr($method_string, 0, 1) eq '_' ? : |
|
253
|
104 |
91 |
if ($package_string eq $class_name) { } |
|
254
|
13 |
91 |
unless $show_methods eq "all" or $show_methods eq $type |
|
258
|
44 |
47 |
unless $show_inherited eq "all" or $show_inherited eq $type |
|
264
|
3 |
1 |
unless $show_methods eq "all" or $show_methods eq $type or $show_inherited eq "all" or $show_inherited eq $type |
|
267
|
4 |
67 |
if ($ddp->class->format_inheritance eq 'string') { } |
|
269
|
3 |
1 |
if @method_list and $ddp->class->sort_methods |
|
273
|
3 |
1 |
if (@method_list) |
|
277
|
6 |
6 |
defined $methods{$type}{$_} ? : |
|
291
|
41 |
85 |
if (defined $pkg_name) { } |
|
301
|
39 |
28 |
if @base_methods and $ddp->class->sort_methods |
|
304
|
41 |
26 |
$total_methods ? : |
|
307
|
39 |
28 |
if (@base_methods) |
|
313
|
15 |
24 |
keys %lined_methods ? : |
|
319
|
22 |
0 |
if $ddp->class->sort_methods |
|
340
|
0 |
224 |
unless $subref |
|
342
|
0 |
224 |
unless $m and $m->isa("B::CV") |
|
344
|
0 |
224 |
unless $gv and not $gv->isa("B::Special") and $gv->NAME |
|
356
|
9 |
508 |
if substr($key, 0, 1) eq "(" |
|
357
|
224 |
284 |
if (ref \$namespace->{$key} ne "GLOB" or defined *{$namespace->{$key};}{"CODE"}) |