| line |
true |
false |
branch |
|
85
|
0 |
8 |
if $@ |
|
140
|
0 |
0 |
$name eq 'null' && $targ ? : |
|
154
|
0 |
36084 |
unless defined wantarray |
|
157
|
31660 |
4424 |
if (ref $op and $$op and $op->flags & 4) { } |
|
164
|
148 |
4276 |
$op->can('first') ? : |
|
|
148 |
4276 |
$op->can('last') ? : |
|
|
0 |
4424 |
$op->can('other') ? : |
|
198
|
220 |
8627 |
if $cx =~ /\b$$op\b/ |
|
201
|
91 |
7964 |
if ($$_ == $$target) |
|
248
|
0 |
0 |
if ${$_[0];} != $$node |
|
381
|
0 |
0 |
@_ == 1 && ref $_[0] eq 'HASH' ? : |
|
388
|
0 |
0 |
if $op->can($attr) |
|
392
|
0 |
0 |
if (!defined($recursion_limit) || $recursion_limit > 0 and ref $op and $$op and $op->flags & 4) |
|
397
|
0 |
0 |
if defined $recursion_limit |
|
405
|
0 |
0 |
if exists $$opt{'max_recursion_depth'} |
|
442
|
1 |
1 |
wantarray ? : |
|
443
|
1 |
2 |
wantarray ? : |
|
454
|
1 |
1 |
wantarray ? : |
|
478
|
3 |
5 |
if $subs_cached |
|
500
|
4 |
71 |
'CV' eq class($_) ? : |
|
523
|
2609 |
6216 |
unless $$cv |
|
534
|
3493 |
2723 |
if ($cv->can('PADLIST') and $cv->PADLIST->can('ARRAY') and $cv->PADLIST->ARRAY->can('ARRAY')) |
|
538
|
185 |
44526 |
'CV' eq class($_) ? : |
|
549
|
0 |
6216 |
unless my $start = $cv->START and my $root = $cv->ROOT |
|
598
|
0 |
57936 |
if $$visited{$$op}++ |
|
600
|
5416 |
52520 |
if (ref $op and $op->isa('B::COP')) |
|
606
|
543 |
57393 |
if $op->isa('B::NULL') |
|
607
|
27366 |
30027 |
if ($op->flags & 4) |
|
613
|
349 |
57044 |
if ($op->isa('B::PMOP')) |
|
615
|
15 |
334 |
if (ref $maybe_root and $maybe_root->isa('B::OP')) |
|
647
|
5505 |
53214 |
if ($op->isa('B::COP')) |
|
652
|
0 |
58719 |
if &$filter($op) |
|
654
|
27739 |
30980 |
if (ref $op and $$op and $op->flags & 4) |
|
834
|
0 |
58719 |
unless defined wantarray |
|
837
|
0 |
58719 |
if 'ARRAY' eq ref $conds_ref |
|
843
|
0 |
58719 |
exists $$conds_ref{'disjunction'} ? : |
|
847
|
543 |
58176 |
unless ref $op and $$op |
|
856
|
0 |
58176 |
if (exists $$condition{'disjunction'}) |
|
865
|
0 |
58176 |
if (exists $$condition{'dump'}) |
|
874
|
0 |
58176 |
unless (defined $condition) |
|
875
|
0 |
0 |
unless defined $op or wantarray |
|
880
|
0 |
58176 |
if ($$condition{'capture'}) |
|
906
|
0 |
58176 |
unless exists $$condition{$test} |
|
909
|
0 |
58176 |
if ('ARRAY' eq ref $$condition{$test}) { } |
|
|
0 |
58176 |
elsif ('CODE' eq ref $$condition{$test}) { } |
|
912
|
0 |
0 |
if ('!' eq $$condition{$test}[0]) { } |
|
928
|
0 |
0 |
unless $okay |
|
933
|
0 |
0 |
unless $$condition{$test}($op) |
|
939
|
58176 |
0 |
unless $$condition{$test} eq $op->$test |
|
950
|
0 |
0 |
unless exists $$condition{$_} |
|
952
|
0 |
0 |
unless $result |
|
954
|
0 |
0 |
unless (blessed $result) |
|
961
|
0 |
0 |
if (exists $$condition{'kids'}) |
|
965
|
0 |
0 |
unless @{$kidconditions;} == @{$$condition{'kids'};} |
|
969
|
0 |
0 |
unless defined $$kidconditions[$kidno] |
|
972
|
0 |
0 |
unless $result |
|
974
|
0 |
0 |
unless (blessed $result) |
|
982
|
0 |
0 |
if (wantarray) { } |
|
|
0 |
0 |
elsif (defined wantarray) { } |
|
983
|
0 |
0 |
if (keys %$capture) { } |
|
1009
|
0 |
0 |
ref $_ ? : |
|
1104
|
0 |
0 |
unless $args |
|
1105
|
0 |
0 |
if ("\n" ne substr($args, -1, 1)) |