| blib/lib/Template/Extract/Compile.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 26 | 69.2 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 12 | 0 | if (defined $template) |
| 24 | 0 | 12 | if UNIVERSAL::isa($template, 'SCALAR') |
| 55 | 1 | 11 | if $EXACT |
| 75 | 8 | 33 | if ($seen{join $;, $2, $4}) { } |
| 80 | 2 | 31 | if ($+[0] == length $regex) { } |
| 98 | 4 | 23 | $vars{$_} ? : |
| 123 | 8 | 41 | if $_[1] =~ m[^/(.*)/$] |
| 136 | 1 | 2 | if ($_[1][1] =~ m[^/(.*)/$]) |
| 147 | 1 | 2 | if (defined $regex) { } |
| 161 | 0 | 24 | unless $_[1] |
| 172 | 0 | 9 | if ($token =~ /^'(.+)'$/) { } |
| 194 | 0 | 0 | unless $DEBUG |
| 204 | 0 | 0 | ref $_[$arg] ? : |