| line |
true |
false |
branch |
|
28
|
0 |
39 |
if ref $options ne 'HASH' |
|
77
|
39 |
0 |
if $$options{'metachars'} |
|
79
|
1 |
38 |
if ($$options{'pre'}) { } |
|
|
2 |
36 |
elsif ($$options{'lines'}) { } |
|
|
29 |
7 |
elsif ($$options{'paras'}) { } |
|
103
|
1 |
1 |
if $$self{'options'}{'spaces'} |
|
118
|
1 |
28 |
if $$options{'title'} |
|
123
|
1 |
28 |
if $$options{'headings'} |
|
124
|
5 |
24 |
if $$options{'bullets'} |
|
125
|
1 |
28 |
if $$options{'numbers'} |
|
127
|
7 |
22 |
if $$options{'tables'} |
|
129
|
3 |
26 |
if ($$options{'blockparas'}) { } |
|
|
2 |
24 |
elsif ($$options{'blockquotes'}) { } |
|
|
4 |
20 |
elsif ($$options{'blockcode'}) { } |
|
146
|
1 |
3 |
unless $text =~ /^((?:$heading)+)\s+/ |
|
180
|
2 |
6 |
unless $columns |
|
193
|
0 |
4 |
unless $text |
|
195
|
1 |
3 |
exists $$paras{$pnum - 1} ? : |
|
210
|
0 |
2 |
unless $text |
|
226
|
0 |
5 |
unless $text |
|
230
|
1 |
4 |
exists $$paras{$pnum - 1} ? : |
|
291
|
6 |
6 |
unless $text =~ /^\s*($identifier)\s+/ |
|
297
|
16 |
12 |
if ($line_pos > $pos) { } |
|
|
4 |
8 |
elsif ($line_pos < $pos) { } |
|
318
|
52 |
31 |
unless $$para{'html'} |
|
329
|
85 |
186 |
if ($chars[$_] eq ' ') { } |
|
330
|
20 |
65 |
unless $open_space |
|
332
|
9 |
177 |
if ($open_space and $_ - $$open_space{'start'} > 1) { } |
|
335
|
11 |
166 |
if $open_space |
|
344
|
2 |
6 |
unless keys %{$spaces;} |
|
349
|
18 |
18 |
if substr($line, $$spaces{$pos}{'start'}, 1) eq ' ' |
|
351
|
18 |
18 |
if substr($line, $$spaces{$pos}{'end'}, 1) eq ' ' and not $key |
|
353
|
36 |
0 |
if ($key) { } |
|
355
|
0 |
36 |
if $spots{$$spaces{$pos}{'start'}} and $key ne $$spaces{$pos}{'start'} |
|
357
|
18 |
18 |
if $key ne $$spaces{$pos}{'end'} |
|
364
|
1 |
53 |
if (substr($line, $spot, 1) ne ' ') |
|
367
|
18 |
36 |
if (exists $$spaces{$spot}) |
|
369
|
17 |
1 |
if (exists $spots{$$space{'start'}} and $spots{$$space{'end'}}) |
|
378
|
6 |
3 |
$_ == 0 ? : |
|
380
|
6 |
0 |
@spots ? : |
|
381
|
0 |
9 |
$ret eq 'A0' ? : |
|
405
|
0 |
19 |
if not $text =~ /^(\s+).+(?:\n\1.+)*$/ and $strict |
|
406
|
14 |
5 |
if $1 |
|
412
|
2 |
7 |
if ($prev_para and $$prev_para{'html'} =~ /<(\w+)>/) |
|
413
|
1 |
1 |
$keep_inner ? : |