Branch Coverage

blib/lib/XML/Smart/HTMLParser.pm
Criterion Covered Total %
branch 49 62 79.0


line true false branch
32 0 25 if ref $this
96 37 149 if ($cont =~ /\S/s)
100 72 114 if ($args[0] =~ m[^/(.*)]) { }
17 97 elsif ($args[-1] =~ m[^/$]) { }
118 72 151 if ($type eq 'End') { }
97 54 elsif ($type eq 'Start') { }
126 25 72 if (not $close{lc $tag}) { }
127 0 25 if (@{$parsed[$i + 1];}[-1] eq '/' and $#{$parsed[$i + 1];} % 2) { }
25 0 elsif ($parsed[$i + 2] ne 'Char') { }
142 0 25 if (%open)
145 0 0 if $open{$i}
159 72 0 ref $args ? :
72 151 if ($type eq 'Start') { }
37 114 elsif ($type eq 'Char') { }
72 42 elsif ($type eq 'End') { }
42 0 elsif ($type eq 'StartEnd') { }
160 0 37 ref $args ? :
161 0 72 ref $args ? :
163 42 0 ref $args ? :
164 42 0 ref $args ? :
181 18 185 if ($args =~ /^!--/s)
182 8 10 unless ($args =~ /--$/s)
228 220 240 if ($1 ne '') { }
95 145 elsif ($2 ne '') { }
83 62 elsif ($3 ne '') { }
10 52 elsif ($4 ne '') { }
52 0 elsif ($5 ne '') { }
239 62 398 if ($got =~ /^(['"])/s)
241 9 53 if (not $got =~ /$q$/s or $got =~ /\\$q$/s) { }
244 83 368 if ($got eq '=') { }
246 3 365 if ($type_last == 0 and $type == 0)