line |
true |
false |
branch |
42
|
71 |
0 |
wantarray ? : |
53
|
19 |
52 |
if (my $sub = $root->{'cf_ns'}->can('export_ok')) |
58
|
71 |
0 |
unless *{$sym;}{'CODE'} |
75
|
188 |
51 |
if ($obj->{'cf_fields'}) { } |
83
|
0 |
239 |
if $obj->{'cf_overloads'} |
84
|
18 |
221 |
if $obj->{'cf_eval'} |
97
|
0 |
71 |
if $debug |
103
|
1 |
70 |
if ($root->{'cf_export_default'}) |
112
|
239 |
0 |
if ($sym and my $fields = *{$sym;}{'HASH'}) { } |
|
0 |
0 |
elsif ($obj->{'cf_fields'}) { } |
113
|
0 |
239 |
if $debug |
134
|
69 |
4 |
unless my $sub = $obj->can($method) |
143
|
379 |
0 |
do {
@_
} ? : |
|
239 |
379 |
do {
ref $item
} ? : |
|
618 |
0 |
defined(my $item = shift()) ? : |
146
|
128 |
111 |
if $parent->{'cf_name'} |