| line |
true |
false |
branch |
|
23
|
0 |
0 |
unless ($sock) |
|
41
|
0 |
0 |
unless ($method =~ /^[A-Za-z0-9_!\#\$%&\'*+\-.^\`|~]+$/) |
|
66
|
0 |
0 |
if ref $$content_ref |
|
70
|
0 |
0 |
if (ref $content_ref eq 'CODE') { } |
|
72
|
0 |
0 |
if $clen |
|
73
|
0 |
0 |
unless (defined $clen) |
|
81
|
0 |
0 |
if (defined $$content_ref and length $$content_ref) { } |
|
|
0 |
0 |
elsif ($clen) { } |
|
83
|
0 |
0 |
if (not defined $clen or $clen ne length $$content_ref) |
|
84
|
0 |
0 |
if (defined $clen) |
|
102
|
0 |
0 |
unless defined $n |
|
103
|
0 |
0 |
unless $n == length $req_buf |
|
109
|
0 |
0 |
if ($has_content) |
|
111
|
0 |
0 |
if ($request_headers->header('Expect') || '') =~ /100-continue/ |
|
117
|
0 |
0 |
if (ref $content_ref eq 'CODE') { } |
|
119
|
0 |
0 |
unless defined $buf |
|
120
|
0 |
0 |
if $chunked |
|
135
|
0 |
0 |
if ($write_wait) |
|
137
|
0 |
0 |
if $write_wait < $sel_timeout |
|
141
|
0 |
0 |
$write_wait ? : |
|
143
|
0 |
0 |
unless (defined $nfound) |
|
147
|
0 |
0 |
if ($write_wait) |
|
149
|
0 |
0 |
if $write_wait < 0 |
|
152
|
0 |
0 |
if (defined $rbits and $rbits =~ /[^\0]/) |
|
156
|
0 |
0 |
unless ($n) |
|
160
|
0 |
0 |
if ($buf =~ /\015?\012\015?\012/) |
|
165
|
0 |
0 |
if ($code eq '100') { } |
|
174
|
0 |
0 |
if (defined $wbits and $wbits =~ /[^\0]/) |
|
176
|
0 |
0 |
unless ($n) |
|
177
|
0 |
0 |
unless defined $n |
|
182
|
0 |
0 |
if (not $eof and $woffset >= length $$wbuf) |
|
185
|
0 |
0 |
unless defined $buf |
|
186
|
0 |
0 |
unless length $buf |
|
187
|
0 |
0 |
if $chunked |
|
196
|
0 |
0 |
unless $code |
|
198
|
0 |
0 |
if $code eq '100' |
|
208
|
0 |
0 |
if @junk |
|
213
|
0 |
0 |
if ($method eq 'CONNECT') |
|
218
|
0 |
0 |
if (my(@te) = $response->remove_header('Transfer-Encoding')) |
|
230
|
0 |
0 |
unless defined $n |
|
231
|
0 |
0 |
if $n == -1 |
|
233
|
0 |
0 |
unless $n |