| line |
true |
false |
branch |
|
25
|
0 |
0 |
if ($host =~ m[^unix://(.+)$]) { } |
|
|
0 |
0 |
elsif ($host =~ m[^tcp://([^:]+):(\d+)$]) { } |
|
32
|
0 |
0 |
unless $sock |
|
43
|
0 |
0 |
unless $sock |
|
61
|
0 |
0 |
defined $version ? : |
|
65
|
0 |
0 |
if ($opts{'raw_body'}) { } |
|
|
0 |
0 |
elsif ($opts{'body'}) { } |
|
73
|
0 |
0 |
if ($opts{'params'}) |
|
77
|
0 |
0 |
unless defined $v |
|
78
|
0 |
0 |
if (ref $v eq "HASH") |
|
83
|
0 |
0 |
if @pairs |
|
93
|
0 |
0 |
if ($body_content) |
|
98
|
0 |
0 |
if ($opts{'headers'}) |
|
101
|
0 |
0 |
unless defined $v |
|
108
|
0 |
0 |
if $body_content |
|
121
|
0 |
0 |
if ($status_code >= 400) |
|
123
|
0 |
0 |
if ($body and $body =~ /^\s*[\{\[]/) |
|
132
|
0 |
0 |
if ($status_code == 204 or not defined $body or $body eq "") |
|
136
|
0 |
0 |
if ($body =~ /^\s*[\{\[]/) |
|
138
|
0 |
0 |
if defined $result |
|
144
|
0 |
0 |
unless $line =~ /\S/ |
|
146
|
0 |
0 |
if defined $obj |
|
148
|
0 |
0 |
if @objects |
|
158
|
0 |
0 |
unless defined $status_line |
|
166
|
0 |
0 |
if $line eq "" |
|
167
|
0 |
0 |
if ($line =~ /^([^:]+):\s*(.*)$/) |
|
173
|
0 |
0 |
if ($headers{'transfer-encoding'} and $headers{'transfer-encoding'} eq 'chunked') { } |
|
|
0 |
0 |
elsif (defined $headers{'content-length'}) { } |
|
178
|
0 |
0 |
if ($len > 0) |
|
183
|
0 |
0 |
unless $n |
|
203
|
0 |
0 |
unless defined $chunk_header |
|
206
|
0 |
0 |
if $chunk_size == 0 |
|
213
|
0 |
0 |
unless $n |
|
240
|
5 |
7 |
if defined $body |
|
247
|
0 |
0 |
if defined $body |