line |
true |
false |
branch |
66
|
0 |
10 |
if ($key =~ /^-(\w+)$/) { } |
|
10 |
0 |
elsif ($key =~ /^\w+$/) { } |
67
|
0 |
0 |
if ($value) |
108
|
0 |
26 |
unless $self->{'requested_features'}{$feature} |
114
|
0 |
26 |
if $self->{'exported_features'}{$feature} |
121
|
1 |
25 |
if (@import_args and not $takes_arguments) |
131
|
1 |
133 |
if ($method_ref = $parent_stash->get_symbol("&$list_method")) { } |
|
21 |
112 |
elsif ($method_ref = $parent_stash->get_symbol("&$direct_method")) { } |
151
|
21 |
3 |
if ($provided) { } |
|
0 |
3 |
elsif ($croak_if_not_implemented) { } |
169
|
2 |
16 |
$class->can($method) ? : |
191
|
254 |
32 |
unless $sub =~ /^feature_(\w+)_default$/ |
203
|
8 |
24 |
if $is_default |