| line |
true |
false |
branch |
|
113
|
20 |
0 |
if $$parser{'skip'} |
|
133
|
17 |
1 |
if $$parser{'header'} |
|
152
|
0 |
18 |
if ($$parser{'doctype'} eq 'refentry') { } |
|
160
|
18 |
0 |
$$parser{'base_id'} ? : |
|
186
|
9 |
9 |
if (@{$$parser{'Pod::2::DocBook::errors'};}) |
|
210
|
11 |
92 |
if $command eq 'pod' |
|
213
|
12 |
80 |
if ($command =~ /^head[1-4]/msx) |
|
215
|
3 |
9 |
any(sub {
$paragraph =~ /^$_/;
}
, @{$$parser{'skip'};}) ? : |
|
227
|
2 |
90 |
if ($command eq 'for') |
|
229
|
1 |
1 |
if ($paragraph =~ /^(:\S+|docbook)/msx) |
|
245
|
12 |
78 |
if ($command =~ /^head[1-4]/msx) { } |
|
|
6 |
72 |
elsif ($command eq 'begin') { } |
|
|
5 |
67 |
elsif ($command eq 'end') { } |
|
|
15 |
52 |
elsif ($command eq 'over') { } |
|
|
36 |
16 |
elsif ($command eq 'item') { } |
|
|
15 |
1 |
elsif ($command =~ /^back/msx) { } |
|
248
|
3 |
9 |
if $$parser{'skip_current'} |
|
290
|
29 |
52 |
unless defined $state |
|
291
|
80 |
1 |
unless $state eq 'begin docbook' |
|
293
|
80 |
1 |
unless $state eq 'begin docbook' |
|
295
|
78 |
3 |
unless ($state eq 'begin docbook' or $state eq 'begin table') |
|
300
|
0 |
81 |
if ($state eq 'name') { } |
|
|
0 |
81 |
elsif ($state eq 'synopsis+') { } |
|
|
0 |
81 |
elsif ($state eq 'synopsis') { } |
|
|
1 |
80 |
elsif ($state eq 'begin docbook') { } |
|
|
2 |
78 |
elsif ($state eq 'begin table') { } |
|
|
2 |
76 |
elsif ($state =~ /^begin\s[^:]/msx) { } |
|
|
1 |
75 |
elsif ($state eq 'over') { } |
|
364
|
2 |
73 |
if $state eq 'verbatim' |
|
381
|
44 |
31 |
unless $state eq 'verbatim' or $state eq '' |
|
386
|
6 |
70 |
if (not $state =~ /^begin/msx and $$parser{'fix_double_quotes'} and $para_out =~ /"/msx) |
|
405
|
78 |
3 |
unless $$parser{'skip_current'} |
|
424
|
1 |
6 |
if $$parser{'skip_current'} |
|
426
|
6 |
0 |
unless $state eq 'begin docbook' |
|
438
|
6 |
0 |
if not defined $min_leader or length $leader < $min_leader |
|
445
|
6 |
0 |
if $min_leader |
|
448
|
0 |
6 |
if (not defined $state) { } |
|
|
0 |
6 |
elsif ($state eq 'name') { } |
|
|
0 |
6 |
elsif ($state eq 'synopsis+') { } |
|
|
0 |
6 |
elsif ($state eq 'synopsis') { } |
|
|
0 |
6 |
elsif ($state eq 'begin docbook') { } |
|
|
0 |
6 |
elsif ($state =~ /^begin\s[^:]/msx) { } |
|
|
0 |
6 |
elsif ($state eq 'over') { } |
|
|
2 |
4 |
elsif ($state eq 'verbatim') { } |
|
518
|
2 |
24 |
if (my $parent = $seq->nested) |
|
519
|
2 |
0 |
if ($parent->cmd_name eq 'E' or $parent->cmd_name eq 'Z') |
|
530
|
0 |
24 |
unless defined $argument |
|
537
|
1 |
23 |
if ($command eq 'I') { } |
|
|
1 |
22 |
elsif ($command eq 'B') { } |
|
|
1 |
21 |
elsif ($command eq 'C') { } |
|
|
10 |
11 |
elsif ($command eq 'L') { } |
|
|
8 |
3 |
elsif ($command eq 'E') { } |
|
|
1 |
2 |
elsif ($command eq 'F') { } |
|
|
0 |
2 |
elsif ($command eq 'S') { } |
|
|
1 |
1 |
elsif ($command eq 'X') { } |
|
|
0 |
1 |
elsif ($command eq 'Z') { } |
|
575
|
24 |
0 |
unless ($seq->nested) |
|
653
|
0 |
33 |
if $$parser{'id_version'} == 2 |
|
677
|
78 |
13 |
if ($id_string =~ /_i(\d+)$/msx) { } |
|
697
|
0 |
0 |
if ($node->cmd_name eq 'L') |
|
711
|
9 |
1 |
if $inferred |
|
713
|
7 |
3 |
if $name |
|
716
|
1 |
9 |
if $type eq 'url' |
|
720
|
2 |
7 |
if (defined $section and not defined $name) |
|
723
|
1 |
1 |
if defined $text |
|
728
|
2 |
5 |
if defined $text |
|
730
|
4 |
1 |
if (defined $name) |
|
731
|
2 |
2 |
$name =~ /(.+?)\((.+)\)/msx ? : |
|
736
|
2 |
2 |
defined $section ? : |
|
749
|
2 |
6 |
unless ($argument =~ /\A\w+\z/msx) |
|
758
|
1 |
1 |
$argument =~ /^\d+$/msx ? : |
|
|
1 |
2 |
$argument =~ /^0/msx ? : |
|
|
1 |
3 |
$argument =~ /^0x/msx ? : |
|
|
0 |
4 |
$argument eq 'rchevron' || $argument eq 'raquo' ? : |
|
|
0 |
4 |
$argument eq 'lchevron' || $argument eq 'laquo' ? : |
|
|
1 |
4 |
$argument eq 'sol' ? : |
|
|
1 |
5 |
$argument eq 'verbar' ? : |
|
774
|
0 |
9 |
if ($$parser{'doctype'} eq 'refentry' and $command eq 'head1' and $paragraph eq 'NAME') { } |
|
|
0 |
9 |
elsif ($$parser{'doctype'} eq 'refentry' and $command eq 'head1' and $paragraph eq 'SYNOPSIS') { } |
|
790
|
0 |
9 |
if ($$parser{'doctype'} eq 'refentry') { } |
|
808
|
1 |
35 |
unless defined $state |
|
810
|
0 |
36 |
if ($state eq 'verbatim') |
|
813
|
0 |
0 |
unless defined $state |
|
816
|
0 |
36 |
if ($state =~ /list\+$/msx) |
|
820
|
14 |
22 |
if ($state eq 'over') { } |
|
|
18 |
4 |
elsif ($state =~ /^o?list/msx) { } |
|
|
3 |
1 |
elsif ($state =~ /^vlist/msx) { } |
|
823
|
2 |
12 |
if (not defined $paragraph or $paragraph =~ /^\s*$/msx or $paragraph eq '*') { } |
|
|
10 |
2 |
elsif ($paragraph =~ /^([1aAiI])\.?$/msx) { } |
|
870
|
18 |
0 |
unless $state =~ /\+$/msx |
|
909
|
18 |
91 |
if ($what eq 'THE END') { } |
|
|
12 |
79 |
elsif ($what =~ /^head(\d)/msx) { } |
|
920
|
42 |
0 |
if ($what eq 'item' || $what eq 'over' and $state eq 'over' || $state =~ /^(o|v)?list/msx) |
|
929
|
0 |
39 |
if ($state =~ /list\+$/msx) |
|
934
|
17 |
22 |
if ($state =~ /^head(\d)/msx) { } |
|
|
1 |
21 |
elsif ($state eq 'indent') { } |
|
|
2 |
19 |
elsif ($state eq 'list') { } |
|
|
10 |
9 |
elsif ($state eq 'olist') { } |
|
|
2 |
7 |
elsif ($state eq 'vlist') { } |
|
|
0 |
7 |
elsif ($state =~ /^synopsis/msx) { } |
|
|
0 |
7 |
elsif ($state eq 'name') { } |
|
|
2 |
5 |
elsif ($state eq 'verbatim') { } |
|
|
5 |
0 |
elsif ($state =~ /^begin\s(.+)/msx) { } |
|
|
0 |
0 |
elsif ($state eq 'over') { } |
|
937
|
8 |
9 |
if ($level > $prev_level) { } |
|
948
|
1 |
8 |
if ($state =~ /\+$/msx) |
|
955
|
0 |
9 |
if ($$parser{'doctype'} eq 'refentry') { } |
|
966
|
0 |
1 |
if $what eq 'item' |
|
969
|
1 |
0 |
if $what eq 'back' |
|
976
|
2 |
0 |
if $what eq 'back' |
|
983
|
10 |
0 |
if $what eq 'back' |
|
991
|
2 |
0 |
if $what eq 'back' |
|
994
|
0 |
0 |
if $state eq 'synopsis+' |
|
1013
|
4 |
1 |
if ($what =~ /^end\s(.+)/msx) { } |
|
|
1 |
0 |
elsif ($what eq 'THE END') { } |
|
1016
|
3 |
1 |
if ($end_format eq $begin_format) { } |
|
1017
|
1 |
2 |
if ($end_format eq 'docbook') |
|
1046
|
0 |
1 |
if ($begin_format eq 'docbook') |
|
1084
|
4 |
12 |
if not defined $columns or @fields > $columns |
|
1101
|
5 |
1 |
if (any sub {
$_ eq $spec;
}
, 'left', 'right', 'center', 'justify') { } |
|
1153
|
2 |
2 |
$volnum ? : |
|
1214
|
0 |
53 |
if $$parser{'id_version'} == 2 |
|
1220
|
0 |
53 |
unless ($id_string =~ /^[A-Za-z_:] [-A-Za-z0-9_.:]*/msx) |