blib/lib/HTTP/Proxy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 37 | 59 | 62.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
219 | 0 | 77 | 13 | $self->max_connections and $self->conn >= $self->max_connections |
377 | 0 | 74 | 1 | not defined $self->response and $req->method eq 'CONNECT' |
480 | 1 | 75 | 0 | defined $req->uri->scheme and $req->uri->scheme =~ /^(?:ftp|gopher)$/ |
76 | 0 | 0 | defined $req->uri->scheme and $req->uri->scheme =~ /^(?:ftp|gopher)$/ and $response->is_success | |
488 | 6 | 9 | 0 | not $last and $served < $self->max_keep_alive_requests |
519 | 5 | 66 | 4 | $response->request and $response->request->method eq 'HEAD' |
684 | 0 | 0 | 30 | defined $mime and $mime ne '' |
713 | 1 | 29 | 0 | ref $filter and $filter->isa('HTTP::Proxy::HeaderFilter') || $filter->isa('HTTP::Proxy::BodyFilter') |
729 | 0 | 18 | 0 | defined $mime and not +($self->response->content_type || '') =~ /$mime/ |
754 | 8 | 0 | 0 | $scheme eq $_ and ++$ok |
line | l | !l | condition |
---|---|---|---|
134 | 214 | 0 | exists $METHODS{$_} or carp("Method group $_ doesn't exist") |
703 | 2 | 25 | $host ||= '.*' |
704 | 0 | 27 | $path ||= '.*' |
705 | 0 | 27 | $query ||= '.*' |
729 | 18 | 0 | $self->response->content_type || '' |
732 | 18 | 0 | $$self{'request'}->method || '' |
733 | 18 | 0 | $$self{'request'}->uri->scheme || '' |
734 | 15 | 3 | $$self{'request'}->uri->authority || '' |
735 | 18 | 0 | $$self{'request'}->uri->path || '' |
736 | 0 | 18 | $$self{'request'}->uri->query || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
485 | 6 | 9 | 61 | $last or $served >= $self->max_keep_alive_requests |
713 | 10 | 19 | 0 | $filter->isa('HTTP::Proxy::HeaderFilter') || $filter->isa('HTTP::Proxy::BodyFilter') |
764 | 19 | 2 | 679 | $self->logmask & $level or $level == -1 |