| line |
true |
false |
branch |
|
299
|
9 |
512 |
if ($text =~ s/
^($$def{'open'}) # opening markup
(\S|\S.*?\S) # content (no leading or trailing ws)
($$def{'close'}) # closing markup
(?=$RE_INLINE_POST) # followed by sentence char or ws
//sx) |
|
305
|
1 |
8 |
exists $$def{'code'} ? : |
|
312
|
70 |
9 |
unless (defined $elem) |
|
313
|
70 |
0 |
if ($text =~ s/^(.*?($RE_INLINE_PRE)+)//s) { } |
|
321
|
49 |
30 |
if (@list and $list[-1]{'type'} eq 'normal text' and $$elem{'type'} eq 'normal text') { } |
|
346
|
6 |
26 |
if not defined $close and defined $parbreak and /^$parbreak/ |
|
348
|
12 |
26 |
defined $close ? : |
|
357
|
7 |
31 |
if $last |
|
362
|
0 |
17 |
if defined $close and not $last |
|
375
|
1 |
16 |
if ($input->match(qr/\((begin +)?[\w -]+\)\n/)) { } |
|
385
|
0 |
1 |
exists $DEFAULT_PARA_RE{$type} && exists $DEFAULT_PARA_RE{$type}{'code'} ? : |
|
393
|
16 |
63 |
if ($input->match($$def{'open'})) |
|
399
|
15 |
1 |
exists $$def{'code'} ? : |
|
407
|
17 |
0 |
if (defined $atom) |
|
428
|
8 |
10 |
if not defined $filter and /^$RE_ALL_ENV/ |
|
433
|
0 |
10 |
if $last |
|
447
|
4 |
74 |
if ($input->match($$def{'open'})) |
|
450
|
3 |
1 |
if ($$def{'merge'}) { } |
|
456
|
0 |
9 |
if ($input->peek =~ /^\s*$/) |
|
465
|
3 |
6 |
exists $$def{'code'} ? : |
|
472
|
0 |
3 |
exists $$def{'merge_code'} ? : |
|
479
|
0 |
1 |
if ($input->peek =~ /^\s*$/) |
|
488
|
0 |
1 |
exists $$def{'code'} ? : |
|
500
|
17 |
4 |
unless (defined $block) |
|
516
|
0 |
0 |
if /^$DEFAULT_SECTION_RE{'open'}/ |
|
520
|
0 |
0 |
if $last |
|
532
|
0 |
11 |
if ($input->match($DEFAULT_SECTION_RE{'open'})) { } |
|
542
|
0 |
0 |
exists $DEFAULT_SECTION_RE{'code'} ? : |
|
572
|
0 |
0 |
unless $output_object or $output_class =~ /::/ |
|
575
|
0 |
0 |
unless ($output_object) |
|
576
|
0 |
0 |
unless eval "require $output_class" |