| line |
true |
false |
branch |
|
80
|
128 |
27 |
if @_ == 1 |
|
129
|
0 |
0 |
if defined wantarray |
|
152
|
0 |
9 |
if $cached = $CACHE{$pod_class} |
|
162
|
0 |
9 |
if $path_only or not $s->path |
|
164
|
9 |
0 |
$MOCK_ROOT ? : |
|
166
|
0 |
9 |
if ($DEBUG_LOL_DUMP) |
|
173
|
0 |
9 |
if ($DEBUG_TREE_DUMP) |
|
200
|
0 |
4 |
if $path = $CACHE{$pod_class} |
|
206
|
0 |
4 |
if $path and -f $path |
|
211
|
2 |
18 |
if $path and -f $path |
|
219
|
9 |
2 |
$_ && $_ ne '.' ? : |
|
220
|
1 |
10 |
if ($path and -f $path) |
|
221
|
0 |
1 |
if ref $s |
|
254
|
0 |
322 |
$tag eq 'for' ? : |
|
316
|
14 |
93 |
unless %$node |
|
319
|
5 |
88 |
if ref $kids and &first(sub {
$_->{'tag'} =~ /$is_head/u;
}
, @$kids) |
|
324
|
0 |
14 |
if $DEBUG_TREE |
|
327
|
0 |
545 |
if $DEBUG_TREE |
|
330
|
0 |
545 |
if $DEBUG_TREE |
|
333
|
93 |
452 |
if (not $is_in or $leaf->{'tag'} =~ /$is_out/u) { } |
|
336
|
88 |
5 |
if ($leaf->{'tag'} =~ /$is_head/u) |
|
342
|
0 |
452 |
if $DEBUG_TREE |
|
375
|
223 |
322 |
if ref $node eq ref {} |
|
380
|
7 |
315 |
if ($tag =~ / ^ over- /ux) { } |
|
404
|
7 |
67 |
unless @nodes |
|
410
|
63 |
4 |
@nodes ? : |
|
416
|
67 |
175 |
if $tag =~ / ^ item- /ux |
|
426
|
0 |
7 |
if ($DEBUG_STRUCT_OVER) |
|
453
|
0 |
10 |
unless my $m = $s->_clean_method_name($method) |
|
466
|
0 |
10 |
unless my $m = $s->_clean_method_name($method) |
|
481
|
0 |
20 |
unless $name =~ /$safe_start/u |
|
482
|
0 |
20 |
unless $name =~ /$safe_end/u |
|
485
|
0 |
20 |
unless $clean =~ /$safe_start/u |
|
548
|
123 |
0 |
if (@raw_conditions == 1 and not ref $raw_conditions[0]) { } |
|
554
|
0 |
123 |
if $DEBUG_FIND_CONDITIONS |
|
559
|
0 |
119 |
if $DEBUG_FIND_AFTER_DEFAULTS |
|
564
|
0 |
119 |
if ($DEBUG_PRE_FIND_DUMP) |
|
571
|
18 |
188 |
if ($_->{'keep_all'}) |
|
576
|
0 |
119 |
if ($DEBUG_FIND_DUMP) |
|
578
|
0 |
0 |
if $DEBUG_FIND_DUMP > 1 |
|
581
|
101 |
18 |
unless ($kept_all) |
|
635
|
25 |
291 |
if (s/$is_keep_all//u) { } |
|
|
28 |
263 |
elsif (s/$is_keep//u) { } |
|
642
|
30 |
286 |
if (s/$is_nth_in_group//u) { } |
|
|
205 |
81 |
elsif (s/$is_nth//u) { } |
|
654
|
12 |
854 |
if ($quote eq substr($_, 0, 1) and $quote eq substr($_, -1)) |
|
665
|
197 |
435 |
unless @condition |
|
667
|
193 |
242 |
$cond =~ s/^~//u ? : |
|
715
|
4 |
119 |
if not $sections && @$sections or grep {ref $_ ne ref {};} @$sections |
|
721
|
0 |
206 |
if $section->{'keep_all'} and $n < $last |
|
728
|
0 |
206 |
if defined $section->{'nth'} and defined $section->{'nth_in_group'} |
|
744
|
283 |
129 |
if (defined $condition->{$_}) { } |
|
745
|
155 |
128 |
if (ref $condition->{$_} ne ref qr//u) |
|
756
|
36 |
376 |
if (defined $condition->{$_}) { } |
|
768
|
156 |
256 |
if (defined $v and $v =~ /$is_digit/u) |
|
770
|
152 |
4 |
$v >= 0 ? : |
|
781
|
93 |
18 |
unless ($_->{'keep'} or $_->{'keep_all'}) |
|
795
|
0 |
206 |
if ($DEBUG_FIND) |
|
813
|
0 |
562 |
if ($DEBUG_FIND) |
|
820
|
0 |
4834 |
if $DEBUG_FIND |
|
822
|
4834 |
0 |
if (defined $try->{'text'}) |
|
823
|
0 |
4834 |
if ($DEBUG_FIND) { } |
|
|
546 |
5262 |
elsif ($try->{'tag'} =~ /$need->{'tag'}/u and $try->{'text'} =~ /$need->{'text'}/u and not defined $try->{'keep'}) { } |
|
837
|
0 |
546 |
if $DEBUG_FIND |
|
846
|
0 |
546 |
if $DEBUG_FIND |
|
849
|
120 |
426 |
if ($nth_p and @found + @found_in_group > $nth_p) { } |
|
|
0 |
852 |
elsif ($nth_in_group_p and @found_in_group > $nth_in_group_p) { } |
|
850
|
0 |
120 |
if $DEBUG_FIND |
|
859
|
0 |
0 |
if $DEBUG_FIND |
|
869
|
1227 |
3061 |
if ($try->{'kids'} and not @found_in_group) |
|
870
|
0 |
1227 |
if $DEBUG_FIND |
|
872
|
8 |
1219 |
if ($try->{'keep'} and not $locked_prev++) |
|
878
|
0 |
8 |
if $DEBUG_FIND |
|
880
|
0 |
1227 |
if $DEBUG_FIND |
|
885
|
0 |
442 |
if ($nth_in_group_n and @found_in_group >= abs $nth_in_group_n) |
|
886
|
0 |
0 |
if $DEBUG_FIND |
|
890
|
186 |
256 |
if @found_in_group |
|
894
|
4 |
202 |
if ($nth_n and @found >= abs $nth_n) |
|
895
|
0 |
4 |
if $DEBUG_FIND |
|
899
|
0 |
206 |
if $DEBUG_FIND |
|
916
|
0 |
101 |
if ($DEBUG_INVERT) |
|
929
|
0 |
379 |
if ($DEBUG_INVERT) |
|
937
|
0 |
8 |
if ($DEBUG_INVERT) |
|
941
|
0 |
8 |
if ($prev_node) { } |
|
943
|
0 |
0 |
if ($DEBUG_INVERT) |
|
951
|
0 |
8 |
if ($DEBUG_INVERT) |
|
957
|
0 |
379 |
if $DEBUG_INVERT |
|
974
|
0 |
119 |
if ($DEBUG_RENDER) |
|
988
|
0 |
419 |
if $DEBUG_RENDER |
|
991
|
0 |
2839 |
if $DEBUG_RENDER |
|
994
|
0 |
2839 |
if $DEBUG_RENDER |
|
996
|
548 |
2291 |
if ($kept_all) { } |
|
|
387 |
1904 |
elsif ($try->{'keep'}) { } |
|
997
|
18 |
530 |
if ++$n == 1 |
|
998
|
164 |
384 |
if ($try->{'tag'} eq "Para") |
|
999
|
0 |
164 |
if $DEBUG_RENDER |
|
1005
|
0 |
387 |
if $DEBUG_RENDER |
|
1009
|
738 |
2101 |
if ($try->{'kids'}) |
|
1011
|
0 |
738 |
if ($DEBUG_RENDER) |
|
1019
|
0 |
119 |
if $DEBUG_RENDER |
|
1021
|
50 |
69 |
if wantarray |
|
1038
|
1 |
5 |
unless ($term_width) |