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" |