Branch Coverage

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


line true false branch
109 27 2 ref $_ eq 'HASH' ? :
128 12 12 if ref $meta->{'result'}[-1] eq "HASH" and not keys %{$$meta{"result"}[-1];}
137 4 54 if (ref $e eq 'ARRAY') { }
22 32 elsif ($e->{'block'}) { }
0 32 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))
209 0 44 if ($meta->{'in'}{'br'})
214 4 40 if ($tag eq 'blockquote') { }
14 26 elsif ($tag eq 'br' and not $meta->{'in'}{'block'}[-1]) { }
20 6 elsif (not $INLINE_TAG{$tag}) { }
227 0 14 if ($line =~ /^\n*($re_quoter)/)
236 4 16 if (not $meta->{'in'}{'block'}[-1] and keys %{$$meta{"current"};})
255 0 34 if ($meta->{'in'}{'br'} and $tag ne "br")
262 4 30 if ($tag eq 'blockquote') { }
10 20 elsif ($tag eq 'br') { }
0 20 elsif ($tag eq 'p') { }
20 0 elsif (not $INLINE_TAG{$tag}) { }
277 6 14 if ($meta->{'in'}{'block'}[-1]) { }
287 0 0 unless $ENTITIES{$1} or $ENTITIES{lc $1}
294 2 34 if ($meta->{'in'}{'br'})
304 0 0 if ($meta->{'in'}{'br'})