line |
true |
false |
branch |
14
|
5 |
0 |
unless (exists $$self{'tags'}) |
33
|
1 |
8 |
if $link =~ /\]$/ |
37
|
2 |
6 |
if ($link =~ /\.(jpe?g|png|bmp|gif)$/is or $title and $title =~ /\.(jpe?g|png|bmp|gif)$/is) { } |
40
|
1 |
1 |
if ($title) { } |
47
|
2 |
4 |
if ($title) { } |
49
|
1 |
1 |
if ($link eq "http://search.cpan.org/perldoc?$title") { } |
80
|
76 |
16 |
$line_no > 0 ? : |
83
|
0 |
92 |
if not $output and $line =~ /^\#/ |
86
|
2 |
90 |
if ($line =~ /^\}\}\}$/) { } |
|
2 |
88 |
elsif ($line =~ /^\{\{\{$/) { } |
|
8 |
80 |
elsif ($$self{'_block_mark'}{'is_code'}) { } |
89
|
2 |
0 |
unless $output =~ /\n{2,}$/ |
93
|
1 |
1 |
unless $output =~ /\n{2,}$/ |
96
|
8 |
0 |
if $output .= " $line\n" |
100
|
6 |
74 |
if ($line =~ /^\|\|(.*?)\|\|$/) { } |
|
0 |
74 |
elsif ($$self{'_block_mark'}{'in_table'}) { } |
101
|
5 |
1 |
if ($$self{'_block_mark'}{'in_table'}) { } |
107
|
1 |
5 |
if ($line_no == $#lines) { } |
110
|
1 |
0 |
if $output .= $self->make_table(@trs) |
117
|
0 |
0 |
if $output .= $self->make_table(@trs) |
120
|
12 |
62 |
if ($line =~ /^\s*$/) |
123
|
12 |
0 |
if $output .= "\n" |
127
|
10 |
52 |
if ($line =~ /^(=+)\s+(.*?)\s+\1\s*$/) |
131
|
7 |
3 |
unless $output =~ /\n{2,}$/ |
132
|
10 |
0 |
if $output .= "=head$h_level $text\n" |
136
|
31 |
21 |
if ($line =~ /^\s+[\*|\#]/) |
137
|
5 |
26 |
unless ($$self{'_block_mark'}{'in_list'}) |
138
|
4 |
1 |
unless ($output =~ /\n{2,}$/) |
144
|
18 |
34 |
unless ($line =~ /^\s+/) |
145
|
1 |
17 |
if ($$self{'_block_mark'}{'in_list'} and not $output =~ /\n{2,}$/) |
156
|
14 |
2 |
if ($do_last_line) |
166
|
3 |
13 |
if ($$self{'_block_mark'}{'in_list'} and not $output =~ /\n{2,}$/) |
189
|
15 |
0 |
defined $_ ? : |
217
|
68 |
5 |
if $start_pos == -1 |
220
|
0 |
5 |
if $end_pos == -1 |