Branch Coverage

blib/lib/CGI/Echo.pm
Criterion Covered Total %
branch 0 18 0.0


line true false branch
84 0 0 if not defined $data && $data =~ /^([^`\x00-\x1F\x7F-\x9F]+)$/ or length $1 == 0 or length $1 > $max_length
85 0 0 if $data =~ m[.+<\s*/?\s*script\s*>]i
86 0 0 if $data =~ m[<(.+)\s*>.*<\s*/?\s*\1\s*>]i
87 0 0 if $integer and not $data && $data =~ /^[0-9]+$/
110 0 0 if not $$self{'_q'}
135 0 0 if (exists $arg{$arg_name}) { }
165 0 0 if ($self->_clean_form_data) { }
188 0 0 if $$self{'_css'}
210 0 0 if exists $$self{"_$arg"}