Branch Coverage

blib/lib/HTTP/Server/Simple/CGI/PreFork.pm
Criterion Covered Total %
branch 0 74 0.0


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) { }