| line |
true |
false |
branch |
|
66
|
4 |
1 |
if $self->disable_proxy |
|
69
|
4 |
1 |
if (not $self->forked) { } |
|
116
|
0 |
1 |
unless defined $len and $len |
|
136
|
1 |
0 |
if ($self->forked) |
|
149
|
3 |
13 |
$self->https ? : |
|
165
|
0 |
12 |
if (scalar keys %pool > $self->maxconn) { } |
|
174
|
3 |
9 |
$self->https ? : |
|
182
|
3 |
9 |
if $self->https |
|
201
|
2 |
11 |
if ($hdr =~ /\bContent-length:\s*(\d+)\b/six) { } |
|
227
|
0 |
12 |
if not defined $r or $@ |
|
249
|
11 |
2 |
if ($req =~ m[^(GET|POST)\s+(.+)\s+(HTTP/1\.[01])$]xi) { } |
|
|
1 |
1 |
elsif ($req =~ m[^CONNECT\s+([\w\.\-]+):(\d+)\s+(HTTP/1\.[01])$]xi) { } |
|
252
|
1 |
10 |
if $uri =~ s[^(https?://[^/]+)][]xi |
|
278
|
3 |
1 |
if ($self->custom_handler) |
|
290
|
1 |
2 |
if ($@) |
|
297
|
2 |
2 |
unless ($found) |
|
308
|
1 |
0 |
if ($self->https) |