blib/lib/WWW/Mechanize/FormFiller.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 7 | 9 | 77.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
77 | 57 | 0 | 3 | ref $name and UNIVERSAL::isa($name, "Regexp") |
120 | 47 | 5 | 3 | $input->type eq "checkbox" and $v eq "" |
133 | 9 | 0 | 7 | ref $_[0] and eval { do { UNIVERSAL::isa($_[0], "HTML::Form") } } |