Branch Coverage

blib/lib/Embperl/Syntax/HTML.pm
Criterion Covered Total %
branch 22 42 52.3


line true false branch
50 2 0 unless ($$self{-'htmlAssignAttr'})
75 0 58 unless $ttref = $$self{-'root'}{$tagtype}
80 10 48 ref $taginfo eq 'HASH' ? :
85 4 18 ref $taginfo eq 'HASH' ? :
22 36 if $procinfo
99 8 50 if ($attrs)
108 18 40 if ($attrsurl)
116 10 8 if $addsess
120 4 54 if ($attrsnoval)
128 24 34 if $addinside
130 24 34 if (exists $$tag{'inside'})
152 2 56 unless exists $$self{-'root'}{'A HTML Tag'}
182 0 0 unless (exists $$inside{'HTML Tag'})
197 0 0 if (ref $v2 eq 'HASH')
200 0 0 unless (exists $$inside{'HTML Tag'})
217 0 0 if (ref $v2 eq 'HASH')
220 0 0 unless (exists $$inside{'HTML Tag'})
236 0 0 if (ref $v2 eq 'HASH')
239 0 0 unless (exists $$inside{'HTML Tag'})
268 0 0 unless exists $$self{-'root'}{'HTML Comment'}
338 0 0 unless $ttref = $$self{-'tagtype'}{$tagtype}