Condition Coverage

blib/lib/HTTP/OAI/UserAgent.pm
Criterion Covered Total %
condition 19 49 38.7


and 3 conditions

line !l l&&!r l&&r condition
39 1 9 0 not $args{'force'} and my(@errors) = HTTP::OAI::Repository::validate_request(%args)
49 0 0 20 defined $args{$_} and length $args{$_}
77 1 8 1 $r->is_success and not defined $r->headers->header("Client-Aborted")
87 2 0 8 defined $r->headers->header("Client-Aborted") and $r->headers->header("Client-Aborted") eq "die"
106 0 10 0 defined $r and $r->code == 503 || $r->code == 429
10 0 0 defined $r and $r->code == 503 || $r->code == 429 and defined(my $timeout = $r->headers->header("Retry-After"))
0 1 9 defined $r and $r->is_success
1 9 0 defined $r and $r->is_success and $cnt_len == 0
183 0 1 0 $IGNORE_BAD_CHARS and length $utf8
248 1 0 0 defined $args{'resumptionToken'} and not $args{'force'}

or 2 conditions

line l !l condition
37 0 10 delete $args{'handlers'} || {}
114 0 0 $timeout || 'null'

or 3 conditions

line l !l&&r !l&&!r condition
35 0 0 10 delete $args{'onRecord'} || $cb || $self->{'onRecord'}
106 0 0 10 $r->code == 503 || $r->code == 429
112 0 0 0 not $timeout or $timeout =~ /\D/
0 0 0 not $timeout or $timeout =~ /\D/ or $timeout < 0
0 0 0 not $timeout or $timeout =~ /\D/ or $timeout < 0 or $timeout > 86400