| line |
true |
false |
branch |
|
42
|
43 |
0 |
wantarray ? : |
|
53
|
11 |
32 |
if (my $sub = $root->{'cf_ns'}->can('export_ok')) |
|
58
|
43 |
0 |
unless *{$sym;}{'CODE'} |
|
75
|
118 |
33 |
if ($obj->{'cf_fields'}) { } |
|
83
|
0 |
151 |
if $obj->{'cf_overloads'} |
|
84
|
12 |
139 |
if $obj->{'cf_eval'} |
|
97
|
0 |
43 |
if $debug |
|
103
|
1 |
42 |
if ($root->{'cf_export_default'}) |
|
112
|
151 |
0 |
if ($sym and my $fields = *{$sym;}{'HASH'}) { } |
|
|
0 |
0 |
elsif ($obj->{'cf_fields'}) { } |
|
113
|
0 |
151 |
if $debug |
|
134
|
43 |
0 |
unless my $sub = $obj->can($method) |
|
143
|
0 |
371 |
if (not defined(my $item = shift())) { } |
|
|
151 |
220 |
elsif (ref $item) { } |
|
|
220 |
0 |
elsif (@_) { } |
|
146
|
82 |
69 |
if $parent->{'cf_name'} |