| blib/lib/Text/MarkPerl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 80 | 0 | 0 | if (ref $element) { } |
| 151 | 1 | 57 | if ($file =~ /^q\{/u) |
| 154 | 1 | 0 | if (defined $substr) { } |
| 172 | 1 | 56 | if ($file =~ /^\{/u) |
| 174 | 1 | 0 | if (defined $substr) { } |
| 192 | 0 | 56 | if ($file =~ /^\[/u) |
| 194 | 0 | 0 | if (defined $substr) { } |
| 208 | 56 | 1152 | if ($file =~ /$rx/u) { } |