| line |
true |
false |
branch |
|
70
|
0 |
0 |
if ($$parser{'_verbose'} >= $level) |
|
84
|
0 |
2 |
unless ref $ptree |
|
92
|
2 |
0 |
if ($num_found == 0) |
|
96
|
0 |
0 |
if ($num_found == 1) |
|
101
|
0 |
0 |
if (defined $_ and $$parser{'langs'}[$i] and $$parser{'langs'}[$i] eq 'en') |
|
113
|
0 |
0 |
if (defined $_) |
|
130
|
0 |
35 |
if ref $pkg |
|
131
|
35 |
0 |
@_ && ref $_[0] eq 'HASH' ? : |
|
135
|
2 |
33 |
exists $arg{$_} ? : |
|
140
|
2 |
33 |
if exists $arg{'langs'} |
|
185
|
35 |
0 |
unless file_name_is_absolute($outfile) |
|
194
|
35 |
35 |
if defined $_ and not m[/$] |
|
197
|
0 |
35 |
if ($$parser{'_verbose'} >= 100) |
|
215
|
0 |
1 |
if ($seq_command eq 'I') { } |
|
|
0 |
1 |
elsif ($seq_command eq 'B') { } |
|
|
0 |
1 |
elsif ($seq_command eq 'C') { } |
|
|
0 |
1 |
elsif ($seq_command eq 'L') { } |
|
|
1 |
0 |
elsif ($seq_command eq 'E') { } |
|
|
0 |
0 |
elsif ($seq_command eq 'F') { } |
|
|
0 |
0 |
elsif ($seq_command eq 'S') { } |
|
|
0 |
0 |
elsif ($seq_command eq 'X') { } |
|
|
0 |
0 |
elsif ($seq_command eq 'Z') { } |
|
|
0 |
0 |
elsif ($seq_command eq 'J') { } |
|
250
|
36 |
0 |
if (isa($paraobj, 'Pod::Paragraph')) { } |
|
265
|
2 |
34 |
if (defined $list[$i]) { } |
|
|
34 |
0 |
elsif ($$parser{'langs'}[$i] eq $$parser{'_default_lang'}) { } |
|
279
|
0 |
36 |
if ($ret eq '') |
|
281
|
0 |
0 |
if defined $_ |
|
285
|
0 |
0 |
defined $_ ? : |
|
296
|
37 |
6 |
if ($$this{'langs'}[$i] eq $lang) |
|
325
|
0 |
1 |
if defined $text |
|
326
|
0 |
1 |
if defined $name |
|
327
|
1 |
0 |
if defined $section |
|
350
|
42 |
0 |
if (can($ptree, 'parse_tree')) |
|
354
|
0 |
0 |
isa($ptree, 'ARRAY') ? : |
|
|
42 |
0 |
can($ptree, 'children') ? : |
|
358
|
45 |
6 |
unless (ref $_) |
|
365
|
1 |
5 |
if ($cmd_name ne 'J' and $cmd_name ne 'L') { } |
|
|
1 |
4 |
elsif ($cmd_name eq 'L') { } |
|
377
|
0 |
1 |
if (not defined $child[$idx_default_lang] and grep {defined $_;} @child[0 .. $#{$$parser{'langs'};}]) |
|
387
|
1 |
1 |
if (defined $child[$i]) |
|
390
|
0 |
1 |
unless defined $ret[$i] |
|
403
|
0 |
1 |
if (not $section and $name =~ / /) |
|
409
|
0 |
1 |
unless ($content =~ /J\
|
|
414
|
0 |
0 |
unless defined $ret[-1] |
|
422
|
2 |
1 |
unless (defined $_) |
|
431
|
0 |
1 |
if (defined $idx_default_lang and not defined $child[$idx_default_lang] and grep {defined $_;} @child[0 .. $#{$$parser{'langs'};}]) |
|
451
|
0 |
1 |
unless defined $idx |
|
456
|
1 |
2 |
if (defined $text1 and $text1 ne '') { } |
|
|
0 |
2 |
elsif (defined $text2 and $text2 ne '') { } |
|
|
0 |
2 |
elsif (defined $text1 or defined $text2) { } |
|
484
|
0 |
1 |
unless defined $ret[-1] |
|
493
|
4 |
0 |
$first =~ m[^\s*(\w+)\s*[/;]] ? : |
|
498
|
0 |
4 |
unless (defined $lang) |
|
505
|
1 |
3 |
if $$parser{'langs'}[$i] ne $lang |
|
512
|
1 |
41 |
unless $ret[-1] =~ /\S/ |
|
528
|
0 |
35 |
unless (@{$$parser{'paras'};}) |
|
545
|
0 |
35 |
if ($$parser{'_verbose'} >= 100) |
|
557
|
2 |
0 |
unless ($paraobj->text =~ /[^\w\s&]/) |
|
575
|
0 |
0 |
if $listtype ne 'dl' |
|
577
|
0 |
0 |
unless ($paraobj->text =~ /[^\w\s&]/) |
|
597
|
0 |
35 |
if ($$parser{'_verbose'} >= 100) |
|
625
|
0 |
80 |
if (grep {$$_[1] eq 'ignore';} @blockstack) |
|
628
|
0 |
0 |
if ($paratype == 8 and $$_[2] eq $blockstack[-1][0][2]) |
|
641
|
0 |
0 |
if (ref $_ || '') eq 'ARRAY' |
|
642
|
0 |
80 |
if ($paratype == 1 or $paratype != 8 and $blk and $$blk[1] eq 'verbatim') { } |
|
|
0 |
80 |
elsif (@verbpack) { } |
|
646
|
0 |
0 |
unless $text =~ /^\n*$/ |
|
652
|
0 |
0 |
unless ($text =~ /^\n*$/) |
|
666
|
34 |
46 |
if ($paratype == 2) { } |
|
|
2 |
44 |
elsif ($paratype == 3) { } |
|
|
0 |
44 |
elsif ($paratype == 4) { } |
|
|
0 |
44 |
elsif ($paratype == 5) { } |
|
|
0 |
44 |
elsif ($paratype == 6) { } |
|
|
44 |
0 |
elsif ($paratype == 7 or $paratype == 8 or $paratype == 9 or $paratype == 10 or $paratype == 11 or $paratype == 12) { } |
|
670
|
0 |
34 |
if $text =~ /^\s*$/ |
|
692
|
0 |
0 |
if ($in_item) |
|
703
|
0 |
0 |
unless (@blockstack) |
|
711
|
0 |
0 |
if ($type eq 'ul' or $type eq 'ol') { } |
|
|
0 |
0 |
elsif ($type eq 'dl') { } |
|
725
|
0 |
0 |
if $first_item |
|
732
|
8 |
36 |
if ($text ne '') { } |
|
746
|
80 |
0 |
if (defined $outtext) |
|
752
|
0 |
35 |
if (@verbpack) |
|
755
|
0 |
0 |
if (not $text =~ /^\n*$/) |