Branch Coverage

blib/lib/HTML/Quoted.pm
Criterion Covered Total %
branch 30 50 60.0


line true false branch
109 25 2 ref $_ eq 'HASH' ? :
128 12 10 if ref $$meta{'result'}[-1] eq 'HASH' and not keys %{$$meta{'result'}[-1];}
137 4 50 if (ref $e eq 'ARRAY') { }
20 30 elsif ($$e{'block'}) { }
0 30 elsif (defined $$e{'quoter'}) { }
146 0 0 if (not $prev or $self->combine($prev, $e))
160 0 0 if ($$last{'quoter'} eq $$e{'quoter'}) { }
0 0 elsif (rindex($$last{'quoter'}, $$e{'quoter'}, 0) == 0) { }
0 0 elsif (rindex($$e{'quoter'}, $$last{'quoter'}, 0) == 0) { }
169 0 0 if (ref $$list[-1] eq 'ARRAY' and not $self->combine($$list[-1], $e))
208 0 40 if ($$meta{'in'}{'br'})
213 4 36 if ($tag eq 'blockquote') { }
14 22 elsif ($tag eq 'br' and not $$meta{'in'}{'block'}[-1]) { }
18 4 elsif (not $INLINE_TAG{$tag}) { }
226 0 14 if ($line =~ /^\n*($re_quoter)/)
235 4 14 if (not $$meta{'in'}{'block'}[-1] and keys %{$$meta{'current'};})
254 0 32 if ($$meta{'in'}{'br'} and $tag ne 'br')
261 4 28 if ($tag eq 'blockquote') { }
10 18 elsif ($tag eq 'br') { }
0 18 elsif ($tag eq 'p') { }
18 0 elsif (not $INLINE_TAG{$tag}) { }
276 6 12 if ($$meta{'in'}{'block'}[-1]) { }
286 0 0 unless $ENTITIES{$1} or $ENTITIES{lc $1}
293 2 34 if ($$meta{'in'}{'br'})
303 0 0 if ($$meta{'in'}{'br'})