Branch Coverage

lib/Template/Document.pm
Criterion Covered Total %
branch 17 28 60.7


line true false branch
36 85 0 $] > 5.007 ? :
85 0 if ($UNICODE = $] > 5.007 ? 1 : 0)
37 85 0 if ($] > 5.008) { }
0 0 elsif ($] == 5.008) { }
70 1284 18 unless (ref $block)
79 0 1284 unless defined $block
84 6 131 ref $_ ? :
156 1 1354 if $$self{'_HOT'} and not $$context{'RECURSION'}
169 18 1336 if $@
188 0 36 if $method eq 'DESTROY'
214 0 0 if ($dblks = $$self{'_DEFBLOCKS'})
295 0 14 unless $file =~ /^(.+)$/s
306 5 9 if ($UNICODE and is_utf8($perlcode))
313 0 14 if $@