| line |
true |
false |
branch |
|
111
|
0 |
1 |
unless my $Element = &_INSTANCE(shift(), "PPI::Element") |
|
112
|
0 |
1 |
if $PPI::Node::_PARENT{builtin::refaddr($Element)} |
|
149
|
2 |
0 |
if (wantarray) { } |
|
210
|
2191 |
0 |
wantarray ? : |
|
226
|
30867 |
31139 |
if wantarray |
|
229
|
70595 |
38351 |
if $_->significant |
|
248
|
2 |
858 |
unless defined &_NUMBER($index) |
|
274
|
32665 |
143730 |
if ($idx < 0) { } |
|
277
|
31069 |
2929 |
if $el->[$cursor]->significant and ++$idx >= 0 |
|
282
|
141807 |
53640 |
if $el->[$cursor]->significant and --$idx < 0 |
|
305
|
5 |
29 |
unless my $Element = &_INSTANCE(shift(), "PPI::Element") |
|
310
|
29 |
50 |
if builtin::refaddr($self) == builtin::refaddr($Element) |
|
373
|
3 |
5201 |
unless my $wanted = $self->_wanted(shift()) |
|
382
|
17285 |
338277 |
if $rv |
|
385
|
0 |
355562 |
unless defined $rv |
|
388
|
295234 |
60328 |
unless $Element->isa("PPI::Node") |
|
392
|
22148 |
38180 |
if ($Element->isa('PPI::Structure')) { } |
|
393
|
22117 |
31 |
if $Element->finish |
|
395
|
22148 |
0 |
if $Element->start |
|
402
|
0 |
5201 |
unless ($ok) |
|
407
|
4346 |
855 |
@found ? : |
|
431
|
0 |
2262 |
unless my $wanted = $self->_wanted(shift()) |
|
441
|
41 |
773930 |
if ($element_rv) |
|
447
|
24108 |
749822 |
unless defined $element_rv |
|
450
|
634962 |
114860 |
unless $Element->isa("PPI::Node") |
|
454
|
43420 |
71440 |
if ($Element->isa('PPI::Structure')) { } |
|
455
|
43374 |
46 |
if defined $Element->finish |
|
457
|
43420 |
0 |
if defined $Element->start |
|
464
|
0 |
2262 |
unless ($ok) |
|
469
|
2221 |
41 |
unless $rv |
|
490
|
3 |
2217 |
$rv ? : |
|
508
|
0 |
66 |
unless my $child = &_INSTANCE(shift(), "PPI::Element") |
|
513
|
1 |
65 |
unless defined $p |
|
531
|
0 |
6 |
unless my $child = &_INSTANCE(shift(), "PPI::Element") |
|
532
|
0 |
6 |
unless my $replacement = &_INSTANCE(shift(), "PPI::Element") |
|
536
|
5 |
1 |
$success ? : |
|
558
|
0 |
30 |
unless my $wanted = $self->_wanted(shift()) |
|
566
|
62 |
207 |
if ($rv) |
|
568
|
0 |
62 |
unless $element->delete |
|
574
|
0 |
207 |
unless defined $rv |
|
576
|
43 |
164 |
if (&_INSTANCE($element, "PPI::Node")) |
|
583
|
0 |
30 |
unless ($ok) |
|
597
|
7495 |
1 |
defined $_[0] ? : |
|
598
|
0 |
1 |
if $^W |
|
603
|
3790 |
3705 |
if &_CODELIKE($it) |
|
604
|
1 |
3704 |
if (ref $it) |
|
606
|
0 |
1 |
if $^W |
|
611
|
1659 |
2045 |
unless substr($it, 0, 5) eq "PPI::" |
|
612
|
1 |
3703 |
unless (&_CLASS($it) and $it->isa("PPI::Element")) |
|
614
|
0 |
1 |
if $^W |
|
623
|
0 |
3703 |
if (defined $_[0]) |
|
625
|
0 |
0 |
if (ref $content eq 'Regexp') { } |
|
|
0 |
0 |
elsif (ref $content) { } |
|
629
|
0 |
0 |
if $^W |
|
649
|
3703 |
0 |
ref $code eq 'CODE' ? : |
|
678
|
3 |
8240 |
unless my $first = $self->{'children'}[0] |
|
691
|
16872 |
101127 |
if ($_[0]{'children'}) |
|
694
|
117979 |
509022 |
if $_->{'children'} |
|
710
|
0 |
4174 |
unless my $elements = $self->{'children'} |
|
712
|
2345 |
1829 |
if (defined(my $position = $PPI::Node::_POSITION_CACHE{$key})) |
|
714
|
2309 |
36 |
if defined $maybe_child and builtin::refaddr($maybe_child) == $key |
|
760
|
1 |
5 |
unless defined $old_child_index |
|
789
|
21 |
112 |
if $Element->isa("PPI::Node") |
|
793
|
31 |
4 |
unless $Node->isa("PPI::Structure") |
|
795
|
4 |
0 |
if $Node->start |
|
798
|
4 |
0 |
if $Node->finish |