| line |
true |
false |
branch |
|
54
|
1177 |
2130 |
unless defined $$path{'cf_index'} and $$path{'cf_index'} <= $#{$$path{'cf_array'};} |
|
57
|
1439 |
691 |
if (not defined $$path{'cur_postype'} or $$path{'cur_postype'} == 1) |
|
59
|
604 |
835 |
ref $val && node_type($val) == 7 ? : |
|
67
|
226 |
301 |
unless defined $$path{'prev_postype'} |
|
68
|
0 |
301 |
unless $$path{'cur_postype'} == 2 |
|
88
|
6 |
0 |
$path ? : |
|
104
|
119 |
133 |
if (@_) { } |
|
138
|
0 |
11 |
$primary_only ? : |
|
141
|
18 |
1 |
if ($node->is_attribute) { } |
|
142
|
18 |
0 |
ref $filter eq 'ARRAY' ? : |
|
148
|
8 |
11 |
if @node |
|
166
|
0 |
0 |
$all ? : |
|
169
|
0 |
0 |
if ($orig->is_attribute and @name = $orig->node_path and $$hash{$name[0]}) |
|
186
|
0 |
0 |
if (defined $name) { } |
|
206
|
114 |
5 |
delete $opts{'primary_only'} ? : |
|
208
|
0 |
119 |
if %opts |
|
212
|
7 |
102 |
if ($node->is_attribute and defined($name = $node->node_name) and exists $$except{$name}) { } |
|
219
|
0 |
7 |
if (defined $$except{$name}) { } |
|
236
|
6 |
591 |
if (not defined(my $path = $$self{'cf_path'})) { } |
|
|
0 |
591 |
elsif (not defined($obj = $$path{'cf_array'}[$$path{'cf_index'}]) or ref $obj ne 'ARRAY') { } |
|
251
|
0 |
0 |
if (not defined(my $path = $$self{'cf_path'})) { } |
|
255
|
0 |
0 |
unless defined $obj and ref $obj eq 'ARRAY' |
|
264
|
6 |
0 |
if defined $obj |
|
269
|
3 |
0 |
if (my $parent = $$self{'cf_path'}->parent) { } |
|
298
|
0 |
7394 |
unless defined $$self{'cf_path'} |
|
307
|
0 |
89 |
unless defined $$self{'cf_path'} |
|
318
|
84 |
4809 |
unless $cursor->readable |
|
319
|
4015 |
794 |
if (ref(my $value = $cursor->current)) { } |
|
330
|
0 |
18 |
unless defined(my $meta = $$cursor{'cf_metainfo'}) |
|
339
|
0 |
0 |
if (my $path = $$self{'cf_path'}) |
|
347
|
7296 |
0 |
if defined $$self{'cf_path'} |
|
353
|
0 |
0 |
if (not defined $$self{'cf_path'}) { } |
|
363
|
0 |
156 |
if (not defined(my $path = $$self{'cf_path'})) { } |
|
373
|
6 |
2 |
if (not defined(my $path = $$self{'cf_path'})) { } |
|
|
0 |
2 |
elsif (not defined(my $obj = $$path{'cf_array'}[$$path{'cf_index'}])) { } |
|
|
2 |
0 |
elsif (ref $obj) { } |
|
386
|
0 |
211 |
unless defined(my $path = $$self{'cf_path'}) |
|
424
|
3 |
463 |
unless defined $item |
|
426
|
152 |
311 |
if (ref $item) { } |
|
438
|
0 |
527 |
unless my $path = $$self{'cf_path'} |
|
444
|
0 |
294 |
unless my $path = $$self{'cf_path'} |
|
445
|
0 |
294 |
unless defined $$path{'cf_index'} |
|
454
|
9 |
19 |
if (not defined $path) { } |
|
|
19 |
0 |
elsif (ref(my $value = $path->current)) { } |
|
466
|
0 |
0 |
if (not defined $path) { } |
|
476
|
6 |
0 |
if (my $path = $$self{'cf_path'}) |
|
483
|
0 |
6 |
wantarray ? : |
|
489
|
130 |
109 |
if (not defined $head) { } |
|
|
109 |
0 |
elsif ($head =~ s[^(\w+((?:\:\w+)*))?(?:([|/?!])(.*))?][]s) { } |
|
493
|
3 |
106 |
$1 && $2 ? : |
|
|
2 |
11 |
defined $4 ? : |
|
|
13 |
96 |
@rest ? : |
|
503
|
0 |
6 |
unless my $path = $$self{'cf_path'} |
|
505
|
4 |
2 |
if $next >= @{$$path{'cf_array'};} |
|
507
|
0 |
2 |
unless defined $item |
|
508
|
1 |
1 |
unless ref $item |
|
523
|
0 |
0 |
if (ref $_[0]) { } |