Branch Coverage

blib/lib/String/Interpolate/Named.pm
Criterion Covered Total %
branch 27 30 90.0


line true false branch
264 245 289 if ($tpl =~ s/ ( ^ (?
 .*? )
		     \x{fddf}
		     (? $keypat )
		     (?: (? \= )
			 (? [^|}\x{fddf}]*) )?
		     (?: \| (? [^|}\x{fddf}]*  )
			 (?: \| (? [^|}\x{fddf}]* ) )?
		     )?
		     \}
		     (? .* )
		     $
		   )
		      /_interpolate($ctl, {%+});/eosx) { }
298 0 534 if $ctl->{'trace'}
301 289 245 if ($prev eq $t)
307 0 245 if $ctl->{'trace'}
322 7 238 if ($key =~ /^(.*)\.(-?\d+)$/)
326 78 167 ref $m eq 'CODE' ? :
327 174 71 if (defined $t)
330 161 13 if (UNIVERSAL::isa($val, 'ARRAY')) { }
0 13 elsif ($inx) { }
332 6 155 if ($inx) { }
333 4 2 if ($inx > 0) { }
334 3 1 if ($inx <= @$val) { }
356 66 179 if ($i->{'op'}) { }
124 55 elsif ($val ne '') { }
358 30 36 if ($i->{'op'} eq '=' and $val eq $test) { }