| line |
true |
false |
branch |
|
172
|
1 |
14 |
if ($lc_tag eq "script" or $lc_tag eq "style") |
|
178
|
12 |
2 |
if (grep {lc $_ eq $lc_tag;} @{$$self{'allow_tags'};}) { } |
|
|
1 |
1 |
elsif ($self->{'encode_invalid_tags'}) { } |
|
182
|
2 |
0 |
if (exists $self->{'allow_attributes'}{$lc_tag} and grep {lc $_ eq $lc_attr;} @{$$self{"allow_attributes"}{$lc_tag};}) |
|
199
|
1 |
14 |
if ($skip_content and $lc_tag eq $stack[-1]) |
|
205
|
12 |
2 |
if (grep {lc $_ eq $lc_tag;} @{$$self{'allow_tags'};}) { } |
|
|
1 |
1 |
elsif ($self->{'encode_invalid_tags'}) { } |
|
207
|
12 |
0 |
if ($stack[-1] and $stack[-1] eq $lc_tag) |
|
219
|
1 |
9 |
if $skip_content |
|
225
|
1 |
1 |
if (not $self->{'strip_comments'}) |