| blib/lib/Text/Textile2MarkdownStandalone.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 30 | 50 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 1 | 4 | if $file |
| 26 | 1 | 6 | if $file |
| 34 | 2 | 1 | if ($self->output_file) { } |
| 44 | 0 | 3 | unless open my $fh, "<:encoding(utf8)", $input_file |
| 53 | 0 | 2 | unless ($string) |
| 56 | 0 | 2 | unless ($output_file) |
| 59 | 0 | 2 | unless open my $fh, ">:encoding(utf8)", $output_file |
| 182 | 39 | 170 | if ($l =~ /^(#+)\s*(.*)/) { } |
| 188 | 15 | 24 | if (not defined $counters[$level - 1]) { } |
| 219 | 4 | 186 | if (not $in_table and $line =~ /^\|/) |
| 221 | 0 | 4 | if ($i > 0 and not $lines[$i - 1] =~ /^\s*$/) |
| 230 | 0 | 190 | if ($processing_multiline_cell) { } |
| 14 | 176 | elsif ($line =~ /^\|/) { } | |
| 232 | 0 | 0 | if ($line =~ /^\|/ or $line =~ /^$/) { } |
| 238 | 0 | 0 | if ($line =~ /^\|/) { } |
| 247 | 0 | 0 | if ($cell =~ / $/) { } |
| 252 | 0 | 0 | if ($cell =~ /^_\.(.*)$/) { } |
| 274 | 0 | 14 | unless ($in_table) |
| 280 | 0 | 14 | if ($line =~ / /) { } |
| 292 | 0 | 0 | if ($cell =~ /^_\.(.*)$/) { } |
| 315 | 10 | 40 | if ($cell =~ /^_\.(.*)$/) { } |
| 325 | 4 | 172 | if ($in_table) |
| 331 | 2 | 2 | unless ($line =~ /^\s*$/) |
| 340 | 0 | 3 | if ($in_table and @table_rows) |
| 352 | 4 | 0 | if (@$table_rows) |