blib/lib/HTTP/Proxy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 36 | 59 | 61.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
215 | 0 | 69 | 12 | $self->max_connections and $self->conn >= $self->max_connections |
373 | 0 | 74 | 0 | not defined $self->response and $req->method eq 'CONNECT' |
476 | 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 | |
484 | 6 | 9 | 0 | not $last and $served < $self->max_keep_alive_requests |
515 | 4 | 66 | 4 | $response->request and $response->request->method eq 'HEAD' |
677 | 0 | 0 | 30 | defined $mime and $mime ne '' |
706 | 1 | 29 | 0 | ref $filter and $filter->isa('HTTP::Proxy::HeaderFilter') || $filter->isa('HTTP::Proxy::BodyFilter') |
722 | 0 | 18 | 0 | defined $mime and not +($self->response->content_type || '') =~ /$mime/ |
747 | 8 | 0 | 0 | $scheme eq $_ and ++$ok |
line | l | !l | condition |
---|---|---|---|
130 | 205 | 0 | exists $METHODS{$_} or carp("Method group $_ doesn't exist") |
696 | 2 | 25 | $host ||= '.*' |
697 | 0 | 27 | $path ||= '.*' |
698 | 0 | 27 | $query ||= '.*' |
722 | 18 | 0 | $self->response->content_type || '' |
725 | 18 | 0 | $$self{'request'}->method || '' |
726 | 18 | 0 | $$self{'request'}->uri->scheme || '' |
727 | 15 | 3 | $$self{'request'}->uri->authority || '' |
728 | 18 | 0 | $$self{'request'}->uri->path || '' |
729 | 0 | 18 | $$self{'request'}->uri->query || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
481 | 6 | 9 | 61 | $last or $served >= $self->max_keep_alive_requests |
706 | 10 | 19 | 0 | $filter->isa('HTTP::Proxy::HeaderFilter') || $filter->isa('HTTP::Proxy::BodyFilter') |
757 | 19 | 1 | 665 | $self->logmask & $level or $level == -1 |