Branch Coverage

blib/lib/IRC/Formatting/HTML/Input.pm
Criterion Covered Total %
branch 47 66 71.2


line true false branch
44 29 0 if defined $text and length $text
63 2 22 if ($tag eq 'br' or $tag eq 'p' or $tag eq 'div' or $tag =~ /^h[\dr]$/)
67 7 18 if ($$attr{'style'})
68 5 2 if ($$attr{'style'} =~ /(?:^|;\s*)color:\s*([^;"]+)/)
70 5 0 if ($color)
73 0 5 if length $$state{'bg'}
76 1 6 if ($$attr{'style'} =~ /font-weight:\s*bold/)
77 1 0 unless $$state{'b'}
80 0 7 if ($$attr{'style'} =~ /font-style:\s*italic/)
81 0 0 unless $$state{'i'}
84 0 7 if ($$attr{'style'} =~ /text-decoration:\s*underline/)
85 0 0 unless $$state{'u'}
88 3 4 if ($$attr{'style'} =~ /background-color:\s*([^;"]+)/)
90 2 1 if ($color)
92 1 1 length $$state{'fg'} ? :
98 4 21 if ($$attr{'color'})
100 4 0 if ($color)
103 0 4 if length $$state{'bg'}
107 6 19 if ($tag eq 'strong' or $tag eq 'b' or $tag =~ /^h\d$/) { }
4 15 elsif ($tag eq 'em' or $tag eq 'i') { }
2 13 elsif ($tag eq 'u') { }
108 6 0 unless $$state{'b'}
111 4 0 unless $$state{'i'}
114 2 0 unless $$state{'u'}
127 7 18 if $$next{'b'} ne $$prev{'b'}
128 4 21 if $$next{'i'} ne $$prev{'i'}
129 2 23 if $$next{'u'} ne $$prev{'u'}
131 11 14 if ($$next{'fg'} ne $$prev{'fg'} or $$next{'bg'} ne $$prev{'bg'})
136 3 8 if (length $$next{'fg'})
139 0 11 if (length $$next{'bg'})
141 0 0 unless length $fg
145 0 11 if length $bg
148 3 22 if ($tag eq 'p' or $tag eq 'div' or $tag =~ /^h[\dr]$/)