blib/lib/HTML/Form.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 50 | 67 | 74.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
82 | 32 | 1 | 2 | ref $html and $html->can("content_charset") |
133 | 57 | 8 | 1 | exists $attr->{'id'} && exists $labels{$attr->{'id'}} |
256 | 141 | 11 | 2 | $type eq "file" and exists $attr->{'value'} |
310 | 104 | 73 | 2 | defined $no and $no < 1 |
323 | 0 | 3 | 1 | not defined $$selector and $_->{'name'} |
332 | 5 | 2 | 0 | $type and $type ne $_->{'type'} |
334 | 7 | 0 | 0 | $no and $no != $c |
348 | 0 | 14 | 5 | not defined $$selector and $_->{'name'} |
357 | 119 | 43 | 8 | $type and $type ne $_->{'type'} |
401 | 2 | 3 | 3 | @v == 1 and ref $v[0] |
508 | 7 | 0 | 0 | $name and not $_->selected($name) |
line | l | !l | condition |
---|---|---|---|
146 | 53 | 13 | delete $attr->{'type'} || 'text' |
150 | 2 | 0 | delete $attr->{'type'} || 'submit' |
235 | 20 | 29 | shift() || 'GET' |
237 | 14 | 35 | shift() || 'application/x-www-form-urlencoded' |
341 | 72 | 101 | $no ||= 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
198 | 2 | 2 | 1 | $tag eq "/form" or $tag eq "input" |
4 | 0 | 1 | $tag eq "/form" or $tag eq "input" or $tag eq "textarea" | |
2 | 0 | 1 | $tag eq "/form" or $tag eq "input" or $tag eq "textarea" or $tag eq "select" | |
0 | 0 | 1 | $tag eq "/form" or $tag eq "input" or $tag eq "textarea" or $tag eq "select" or $tag eq "keygen" | |
236 | 49 | 0 | 0 | shift() || Carp::croak('No action defined') |
392 | 0 | 135 | 51 | not defined $n or $n ne $name |
412 | 2 | 7 | 0 | $err ||= $@ |
439 | 0 | 6 | 8 | not defined $n or $seen{$n}++ |