Branch Coverage

blib/lib/LWP/Protocol/UWSGI.pm
Criterion Covered Total %
branch 0 136 0.0


line true false branch
55 0 0 unless ($method =~ /^[A-Za-z0-9_!\#\$%&\'*+\-.^\`|~]+$/)
62 0 0 unless ($$url =~ m[^uwsgi://([^/?\#:]+)(?:\:(\d+))/])
67 0 0 $proxy ? :
75 0 0 $proxy ? :
0 0 $method eq 'CONNECT' ? :
77 0 0 unless $path =~ m[^/]
84 0 0 if ($conn_cache)
86 0 0 if ($socket = $conn_cache->withdraw($self->socket_type, $cache_key))
87 0 0 if ($socket->can_read(0))
97 0 0 unless ($socket)
116 0 0 if ref $$content_ref
120 0 0 if (ref $content_ref eq 'CODE') { }
122 0 0 if $clen
123 0 0 unless (defined $clen)
132 0 0 if (defined $$content_ref and length $$content_ref) { }
0 0 elsif ($clen) { }
134 0 0 if (not defined $clen or $clen ne $has_content)
135 0 0 if (defined $clen)
149 0 0 $fullpath =~ /^[^?]+\?(.+)$/ ? :
151 0 0 defined $request_headers->header('Content-Length') ? :
152 0 0 $method =~ /post/i ? :
163 0 0 defined $h{$k} ? :
168 0 0 unless defined $$env{$k}
178 0 0 if (not $has_content or $has_content > 8192)
184 0 0 unless (defined $n)
185 0 0 if $!{'EINTR'}
186 0 0 if ($!{'EWOULDBLOCK'} or $!{'EAGAIN'})
192 0 0 if ($n) { }
198 0 0 if length $req_buf
205 0 0 if ($has_content)
210 0 0 if (ref $content_ref eq 'CODE') { }
212 0 0 unless defined $buf
213 0 0 if $chunked
215 0 0 if $req_buf
219 0 0 if ($req_buf) { }
236 0 0 if $sel_timeout
244 0 0 if ($nfound < 0)
245 0 0 if ($!{'EINTR'} or $!{'EWOULDBLOCK'} or $!{'EAGAIN'})
246 0 0 if ($time_before)
248 0 0 if $sel_timeout < 0
256 0 0 if (defined $rbits and $rbits =~ /[^\0]/)
260 0 0 if (not defined $n) { }
0 0 elsif ($n == 0) { }
261 0 0 unless $!{'EINTR'} or $!{'EWOULDBLOCK'} or $!{'EAGAIN'}
273 0 0 if (not $code and $buf =~ /\015?\012\015?\012/)
276 0 0 if ($code eq '100') { }
287 0 0 if (defined $wbits and $wbits =~ /[^\0]/)
289 0 0 if (not defined $n) { }
0 0 elsif ($n == 0) { }
290 0 0 unless $!{'EINTR'} or $!{'EWOULDBLOCK'} or $!{'EAGAIN'}
298 0 0 if (not $eof and $woffset >= length $$wbuf)
301 0 0 unless defined $buf
302 0 0 unless length $buf
303 0 0 if $chunked
313 0 0 unless $code
315 0 0 if $code eq '100'
325 0 0 if @junk
330 0 0 if ($method eq 'CONNECT')
335 0 0 if (my(@te) = $response->remove_header('Transfer-Encoding'))
347 0 0 unless (defined $n)
348 0 0 if $!{'EINTR'} or $!{'EWOULDBLOCK'} or $!{'EAGAIN'} or $!{'ENOTTY'}
351 0 0 if $n == -1
353 0 0 unless $n
356 0 0 unless $complete
359 0 0 if (@h)
365 0 0 unless ($drop_connection)
366 0 0 if ($cache_key)
369 0 0 if ($peer_http_version eq '1.1' and not $connection{'close'} or $connection{'keep-alive'})