|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
40
 | 
 73  | 
 31  | 
 unless @tags
  | 
 
| 
64
 | 
 72  | 
 44  | 
 unless @stack
  | 
 
| 
73
 | 
 3  | 
 38  | 
 unless @stack
  | 
 
| 
75
 | 
 38  | 
 0  | 
 if ($stack[-1]{'name'} eq $tagname)
  | 
 
| 
95
 | 
 23  | 
 10  | 
 unless $purge_tags{$field}
  | 
 
| 
105
 | 
 37  | 
 1  | 
 if (%{$html->{$tag}{'attr'};}) { }
  | 
 
| 
107
 | 
 37  | 
 0  | 
 if (exists $self->{'Tag_handlers'}{"$tag $attr"})
  | 
 
| 
113
 | 
 1  | 
 0  | 
 if (exists $self->{'Tag_handlers'}{$tag})
  | 
 
| 
119
 | 
 32  | 
 25  | 
 if ($self->_field_rewrite($field, $handler))
  | 
 
| 
120
 | 
 23  | 
 9  | 
 unless (exists $rewritten{$tagname})
  | 
 
| 
125
 | 
 1  | 
 62  | 
 unless defined $subst_item->[1]
  | 
 
| 
131
 | 
 31  | 
 1  | 
 if (defined $html->{$tag}{'text'}) { }
  | 
 
| 
145
 | 
 47  | 
 7  | 
 if ($self->_field_rewrite($field, $handler))
  | 
 
| 
146
 | 
 2  | 
 30  | 
 if (not $tagname =~ /\b\s+?\b/ and $fields->{$field} =~ /<$tagname>/ and not $fields->{$field} =~ m[</$tagname>])
  | 
 
| 
172
 | 
 3  | 
 0  | 
 if not /^\_/
  | 
 
| 
192
 | 
 45  | 
 1  | 
 if (defined $html->{$tag}{'text'})
  | 
 
| 
196
 | 
 45  | 
 0  | 
 if (defined $html->{$tag}{'attr'}{$attr})
  | 
 
| 
240
 | 
 18  | 
 25  | 
 unless $f = eval {
  | 
 
| 
277
 | 
 31  | 
 1  | 
 if (@{$html->{$tag}{'attrseq'};}) { }
  | 
 
| 
282
 | 
 30  | 
 1  | 
 defined $text ? :
  |