Branch Coverage

blib/lib/NTS/Template.pm
Criterion Covered Total %
branch 73 98 74.4


line true false branch
67 0 6 if $$vars{'templ_extra'}{'nospaces'}
72 4 16 if (defined $$vars{'templ_vars'}{$_}) { }
1 15 elsif ($$func{$_}) { }
84 0 6 if (defined $$vars{'templ_extra'}{'oreturn'}) { }
0 6 elsif ($ENV{'MOD_PERL'}) { }
6 0 elsif ($$vars{'templ_extra'}{'source'}) { }
92 0 0 if $$vars{'templ_extra'}{'source'}
103 1 5 if ($@)
104 0 1 if ($ENV{'MOD_PERL'}) { }
112 0 6 if $$vars{'templ_extra'}{'source'} and $$vars{'templ_extra'}{'oreturn'}
115 0 6 if $$vars{'templ_extra'}{'oreturn'}
127 6 0 if (open FH, '<' . $file) { }
151 4 52 $2 =~ /^#/ ? :
154 5 51 if ($l eq 'ELSE') { }
16 35 elsif ($l eq 'END' or $l eq '/IF' or $l eq '/FOREACH') { }
0 35 elsif ($l =~ /^INCLUDE\s+(\-[a-z]+)?\s?(.*)/) { }
14 21 elsif ($l =~ /^IF\s?(.*)/) { }
1 20 elsif ($l =~ /^UNLESS\s?(.*)/) { }
1 19 elsif ($l =~ /^FOREACH\s+(\w+)\s?=\s?(.*)/) { }
1 18 elsif ($l =~ /^FOR\s?(.*)/) { }
1 17 elsif ($l =~ /^(ELSIF|^ELSEIF)\s?(.*)/) { }
2 15 elsif ($l =~ /^\&(\w+)\((.*)\)/) { }
162 0 0 if ($$templ_vars{$j} =~ m[^(.*)/([\w\-\.]+)$]) { }
163 0 0 if not $i or $i eq '-f' and -f $1 . '/' . $2
168 0 0 if not $i or $i eq '-f' and -f $templ_dir . '/' . $j
202 30 26 if ($c)
210 0 8 if ($4) { }
0 8 elsif ($1) { }
227 8 51 if ($j eq '==') { }
2 49 elsif ($j eq '!=') { }
232 1 58 if ($i eq '0')
233 0 1 if ($n[$#n] =~ /\s+?eq\s+?/) { }
0 1 elsif ($n[$#n] =~ /\s+?ne\s+?/) { }
238 8 51 if ($i =~ /^\.(\d+)/) { }
246 23 36 if ($j)
254 13 17 if (defined $nc) { }
256 2 11 if (not $#n and $i =~ /\w$|}$/) { }
2 9 elsif (defined $fc) { }
272 1 16 if (defined $tp)
277 0 1 if ($j eq 'ARRAY') { }
0 1 elsif ($j eq 'HASH') { }
294 6 0 if $data
304 2 49 if ($i eq 'AND') { }
1 48 elsif ($i eq 'OR') { }
5 43 elsif ($i =~ /^(\d+)$/) { }
32 11 elsif ($i =~ /^(\w+)([\+\-]{2})?$/) { }
10 1 elsif ($i =~ /^\w+[\.]{1}\w+/) { }
319 10 10 if (@r) { }
334 0 62 if $oreturn