Branch Coverage

lib/Template/Filters.pm
Criterion Covered Total %
branch 52 86 60.4


line true false branch
112 0 0 defined $args ? :
0 0 defined $context ? :
0 150 if $$self{'DEBUG'}
119 4 146 if (ref $name) { }
120 0 4 if (blessed $name and $name->isa($PLUGIN_FILTER)) { }
130 0 146 unless $factory = $$self{'FILTERS'}{$name} || $$FILTERS{$name}
135 86 60 if (ref $factory eq 'ARRAY') { }
142 144 2 if (ref $factory eq 'CODE') { }
143 84 60 if ($is_dynamic) { }
148 61 23 $args ? :
151 1 83 unless $error or ref $filter eq 'CODE'
163 9 137 if ($error) { }
165 0 9 $$self{'TOLERANT'} ? :
185 0 7 if $$self{'DEBUG'}
230 0 0 unless defined $val
245 0 0 ref $f eq 'ARRAY' ? :
246 0 0 $dynamic ? :
278 1 14 if ($] >= 5.008 and utf8::is_utf8($text))
303 0 1 if ($] >= 5.008 and utf8::is_utf8($text))
425 1 0 ref $haz eq 'CODE' ? :
442 4 12 unless defined $pad
443 13 3 if $pad =~ /^\d+$/l
447 0 16 unless defined $text
462 3 8 unless defined $format
466 0 19 unless defined $text
480 0 3 unless defined $iter and length $iter
484 0 3 unless defined $text
498 0 12 unless defined $search
499 0 12 unless defined $replace
503 0 13 unless defined $text
521 0 6 unless defined $text
536 1 9 unless defined $len
537 10 0 unless defined $char
541 1 9 if ($len < $lchar)
548 3 7 if length $text <= $len
583 1 3 unless $context->eval_perl
595 0 3 if $@
611 1 1 unless $outpath
615 0 1 if $file =~ m[(^|/)\.\./]l
618 1 0 unless ref $options
626 0 1 if $error
642 0 0 unless ref $options
646 0 0 if $$options{'binmode'}