blib/lib/HTML/EscapeEvil.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 45 | 35.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
64 | 2 | 2 | 0 | $args{'allow_entity_reference'} ne '' and $args{'allow_entity_reference'} == 0 |
324 | 0 | 0 | 0 | exists $JS_EVENT{$event} and not $JS_EVENT{$event} |
332 | 0 | 0 | 0 | not $JS_EVENT{'cite'} and $$attr{'href'} =~ /^(java|vb)script:/i |
369 | 39 | 0 | 0 | $is_cdata and $$self{'_current_tag'} eq 'script' |
39 | 0 | 0 | $is_cdata and $$self{'_current_tag'} eq 'script' and $$self{'allow_script'} | |
373 | 39 | 0 | 0 | $is_cdata and $$self{'_current_tag'} eq 'style' |
39 | 0 | 0 | $is_cdata and $$self{'_current_tag'} eq 'style' and $$self{'allow_style'} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
80 | 0 | 4 | 0 | ref $class || $class |
117 | 0 | 0 | 10 | $tag eq 'script' or $tag eq 'style' |
133 | 0 | 0 | 2 | $tag eq 'script' or $tag eq 'style' |
156 | 0 | 0 | 52 | $tag eq 'script' or $tag eq 'style' |
192 | 0 | 0 | 2 | ref $_[0] eq 'GLOB' || ref \$_[0] eq 'GLOB' |
2 | 0 | 0 | open($fh, "> $_[0]") || croak($!) | |
203 | 1 | 0 | 1 | -e $_[0] or ref $_[0] eq 'GLOB' |
1 | 0 | 1 | -e $_[0] or ref $_[0] eq 'GLOB' or ref \$_[0] eq 'GLOB' |