Branch Coverage

blib/lib/HTML/Embellish.pm
Criterion Covered Total %
branch 51 62 82.2


line true false branch
71 1 63 unless ref $html and $html->can('content_refs_list')
84 1 63 if @_ % 2
90 9 54 exists $parms{'default'} ? :
93 1 62 exists $parms{'dashes'} ? :
94 4 59 exists $parms{'ellipses'} ? :
95 2 61 exists $parms{'quotes'} ? :
97 0 63 exists $parms{'hellip'} ? :
99 0 63 exists $parms{'space_ellipses'} ? :
120 56 4 if ($fixQuotes)
150 1 55 if (/"/)
163 58 2 if ($$self[3])
173 57 4 if ($fixQuotes)
190 1 64 unless ref $elt and $elt->can('content_refs_list')
193 0 64 if $elt->is_empty
198 60 3 if ($isP and $$self[1] || $$self[3])
206 57 0 if ($$self[1] and $$self[0] and @content)
208 56 1 unless ref ${$content[0];}
210 56 1 unless ref ${$content[-1];}
214 2 63 if (ref $$r) { }
216 0 2 if $tag =~ /^(?: ~comment | script | style )$/x
218 0 2 if ($$self[0] and $tag eq 'br')
226 55 8 if ($$self[2])
231 58 5 if $$self[5]
234 58 5 if ($$self[3])
241 58 5 if ($$self[4])
247 0 58 if ($$self[0] and @{$$self[0];})
249 0 0 if ${$$self[0][-1];} =~ /\w[!?,;]?$/
251 0 0 if $$r =~ /^\w/
256 60 3 if $$self[0]
260 60 4 if ($isP and $$self[0])
263 1 59 if $parentRefs