| line |
true |
false |
branch |
|
18
|
0 |
0 |
unless (defined $config{'prefork'}) |
|
22
|
0 |
0 |
unless (defined $config{'usessl'}) |
|
26
|
0 |
0 |
if ($config{'prefork'}) { } |
|
44
|
0 |
0 |
if ($config{'usessl'}) { } |
|
58
|
0 |
0 |
unless $self->stdio_handle |
|
66
|
0 |
0 |
if (not $remote_sockaddr and defined $main::_realpeername) |
|
71
|
0 |
0 |
if ($remote_sockaddr) |
|
75
|
0 |
0 |
$iaddr ? : |
|
77
|
0 |
0 |
unless (eval {
do {
($iport, $iaddr) = sockaddr_in($remote_sockaddr);
$peeraddr = $iaddr ? inet_ntoa($iaddr) || '127.0.0.1' : '127.0.0.1';
1
}
}) |
|
83
|
0 |
0 |
unless (eval {
do {
($iport, $iaddr) = unpack_sockaddr_in6($remote_sockaddr);
$peeraddr = inet_ntop(10, $iaddr);
1
}
}) |
|
96
|
0 |
0 |
if (not defined $peeraddr) { } |
|
|
0 |
0 |
elsif ($peeraddr =~ /^\:\:ffff\:(\d+)\./) { } |
|
106
|
0 |
0 |
unless ($self->valid_http_method($method)) |
|
116
|
0 |
0 |
defined $query_string ? : |
|
131
|
0 |
0 |
if ($proto =~ m[HTTP/(\d(\.\d)?)$] and $1 >= 1) |
|
134
|
0 |
0 |
unless (my $headers = $self->parse_headers) |
|
142
|
0 |
0 |
if (defined($xheaders{'Expect'} && $xheaders{'Expect'} =~ /100\-continue/i)) |
|
147
|
0 |
0 |
if ($do_continue) |
|
148
|
0 |
0 |
if $self->can('post_setup_hook') |
|
171
|
0 |
0 |
unless $self->stdio_handle |
|
179
|
0 |
0 |
if (not $remote_sockaddr and defined $main::_realpeername) |
|
185
|
0 |
0 |
if ($remote_sockaddr) |
|
189
|
0 |
0 |
$iaddr ? : |
|
191
|
0 |
0 |
unless (eval {
do {
($iport, $iaddr) = sockaddr_in($remote_sockaddr);
$peeraddr = $iaddr ? inet_ntoa($iaddr) || '127.0.0.1' : '127.0.0.1';
1
}
}) |
|
198
|
0 |
0 |
unless (eval {
do {
($iport, $iaddr) = unpack_sockaddr_in6($remote_sockaddr);
$peeraddr = inet_ntop(10, $iaddr);
1
}
}) |
|
211
|
0 |
0 |
if (not defined $peeraddr) { } |
|
|
0 |
0 |
elsif ($peeraddr =~ /^\:\:ffff\:(\d+)\./) { } |
|
221
|
0 |
0 |
unless ($self->valid_http_method($method)) |
|
230
|
0 |
0 |
if (not defined $request_uri or $request_uri eq '') |
|
237
|
0 |
0 |
defined $query_string ? : |
|
252
|
0 |
0 |
if ($proto =~ m[HTTP/(\d(\.\d)?)$] and $1 >= 1) |
|
255
|
0 |
0 |
unless (my $headers = $self->parse_headers) |
|
263
|
0 |
0 |
if (defined($xheaders{'Expect'} && $xheaders{'Expect'} =~ /100\-continue/i)) |
|
268
|
0 |
0 |
if ($do_continue) |
|
269
|
0 |
0 |
if $self->can('post_setup_hook') |
|
293
|
0 |
0 |
if (defined $config{$ssl_arg}) |
|
316
|
0 |
0 |
if ($server) { } |
|
324
|
0 |
0 |
if $config{'usessl'} |