blib/lib/String/TT.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 16 | 87.5 |
line | true | false | branch |
---|---|---|---|
32 | 0 | 10 | unless defined $template |
34 | 0 | 10 | unless peek_my(1) |
41 | 12 | 3 | if ($sigil eq '$') |
49 | 11 | 1 | unless (exists $transformed_vars{$varname}) |
56 | 1 | 9 | unless $t->process(\$template, \%transformed_vars, \$output) |
66 | 8 | 3 | if $lines[0] eq '' |
69 | 3 | 14 | unless /^(\040+)/ and length $1 |
80 | 5 | 6 | if $trailing_newline |