| line |
true |
false |
branch |
|
29
|
0 |
0 |
unless defined $LWPx::Protocol::http_paranoid::TOO_LATE |
|
31
|
0 |
0 |
if $LWPx::Protocol::http_paranoid::TIME_REMAIN < 0 |
|
45
|
0 |
1 |
if ($conn_cache) |
|
46
|
0 |
0 |
if (my $sock = $conn_cache->withdraw('http', "${host}:$port")) |
|
47
|
0 |
0 |
if $sock and not $sock->can_read(0) |
|
56
|
0 |
0 |
unless (@addrs) |
|
67
|
0 |
0 |
$request->{'_timebegin'} ? : |
|
81
|
0 |
0 |
unless ($sock) |
|
104
|
0 |
0 |
if (defined(my $peerhost = $sock->peerhost)) |
|
115
|
0 |
0 |
if ($hhost =~ s/^([^\@]*)\@//) |
|
119
|
0 |
0 |
if (defined $1 and not $h->header('Authorization')) |
|
133
|
0 |
0 |
unless lc $hlist->[$i] eq $k |
|
147
|
1 |
0 |
if ($timeout) |
|
156
|
0 |
1 |
unless ($method =~ /^[A-Za-z0-9_!\#\$%&\'*+\-.^\`|~]+$/) |
|
168
|
0 |
1 |
unless $fullpath =~ m[^/] |
|
186
|
0 |
0 |
if ref $$content_ref |
|
190
|
0 |
0 |
if (ref $content_ref eq 'CODE') { } |
|
192
|
0 |
0 |
if $clen |
|
193
|
0 |
0 |
unless (defined $clen) |
|
202
|
0 |
0 |
if (defined $$content_ref and length $$content_ref) { } |
|
|
0 |
0 |
elsif ($clen) { } |
|
204
|
0 |
0 |
if (not defined $clen or $clen ne length $$content_ref) |
|
205
|
0 |
0 |
if (defined $clen) |
|
225
|
0 |
0 |
unless defined $n |
|
226
|
0 |
0 |
unless $n == length $req_buf |
|
234
|
0 |
0 |
if ($has_content) |
|
236
|
0 |
0 |
if ($request_headers->header('Expect') || '') =~ /100-continue/ |
|
242
|
0 |
0 |
if (ref $content_ref eq 'CODE') { } |
|
244
|
0 |
0 |
unless defined $buf |
|
245
|
0 |
0 |
if $chunked |
|
262
|
0 |
0 |
if ($now > $LWPx::Protocol::http_paranoid::TOO_LATE) |
|
267
|
0 |
0 |
if ($write_wait) |
|
269
|
0 |
0 |
if $write_wait < $sel_timeout |
|
273
|
0 |
0 |
$write_wait ? : |
|
275
|
0 |
0 |
unless (defined $nfound) |
|
279
|
0 |
0 |
if ($write_wait) |
|
281
|
0 |
0 |
if $write_wait < 0 |
|
284
|
0 |
0 |
if (defined $rbits and $rbits =~ /[^\0]/) |
|
291
|
0 |
0 |
unless ($n) |
|
295
|
0 |
0 |
if ($buf =~ /\015?\012\015?\012/) |
|
300
|
0 |
0 |
if ($code eq '100') { } |
|
311
|
0 |
0 |
if (defined $wbits and $wbits =~ /[^\0]/) |
|
313
|
0 |
0 |
unless ($n) |
|
314
|
0 |
0 |
unless defined $n |
|
319
|
0 |
0 |
if (not $eof and $woffset >= length $$wbuf) |
|
322
|
0 |
0 |
unless defined $buf |
|
323
|
0 |
0 |
unless length $buf |
|
324
|
0 |
0 |
if $chunked |
|
340
|
0 |
0 |
unless $nfound |
|
344
|
0 |
0 |
unless $code |
|
346
|
0 |
0 |
if $code eq '100' |
|
356
|
0 |
0 |
if @junk |
|
361
|
0 |
0 |
if ($method eq 'CONNECT') |
|
366
|
0 |
0 |
if (my(@te) = $response->remove_header('Transfer-Encoding')) |
|
379
|
0 |
0 |
if not defined $n and $! == 11 |
|
380
|
0 |
0 |
if $n == -1 |
|
381
|
0 |
0 |
unless defined $n |
|
382
|
0 |
0 |
unless $LWPx::Protocol::http_paranoid::TIME_REMAIN - 1 |
|
384
|
0 |
0 |
unless $n |
|
387
|
0 |
0 |
unless $complete |
|
397
|
0 |
0 |
unless ($drop_connection) |
|
398
|
0 |
0 |
if (my $conn_cache = $self->{'ua'}{'conn_cache'}) |
|
401
|
0 |
0 |
if ($peer_http_version eq '1.1' and not $connection{'close'} or $connection{'keep-alive'}) |
|
421
|
0 |
0 |
if (defined $timeout) { } |
|
422
|
0 |
0 |
unless $self->can_read($timeout) |
|
427
|
0 |
0 |
unless $self->can_read(undef) |
|
439
|
0 |
0 |
unless defined $nfound |