blib/lib/Mojo/Transaction/HTTP/Role/Mechanize.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 12 | 91.6 |
line | true | false | branch |
---|---|---|---|
21 | 2 | 12 | if @_ and ref $_[-1] eq 'HASH' |
22 | 8 | 6 | if @_ % 2 |
26 | 1 | 13 | if $self->error |
29 | 2 | 11 | unless my $form = $self->extract_forms->grep(sub { $_->at($selector // ''); } )->first |
32 | 1 | 10 | unless my($method, $target, $type) = $form->target($selector) |
34 | 10 | 0 | unless $target->is_abs |