| line |
true |
false |
branch |
|
86
|
0 |
0 |
if (not $$buffer =~ s/^\s*([a-f0-9]+)[ \t]*\r\n//is) { } |
|
107
|
0 |
0 |
unless (my $res = $self->_response) |
|
109
|
0 |
0 |
unless ($$buffer =~ s[.*^(HTTP/\d\..*? [12345]\d\d\b)][$1]m) |
|
116
|
0 |
0 |
unless ($$buffer =~ s/^(.*?\r?\n\r?\n)//ms) |
|
137
|
0 |
0 |
if ($te and $te eq 'chunked') |
|
138
|
0 |
0 |
unless (defined $chunksize) |
|
142
|
0 |
0 |
if (defined $chunksize) |
|
156
|
0 |
0 |
if ($chunksize == 0) { } |
|
|
0 |
0 |
elsif (length $$buffer) { } |
|
161
|
0 |
0 |
if ($$buffer eq '') |
|
173
|
0 |
0 |
unless defined $chunksize |
|
180
|
0 |
0 |
if (defined $len and length $$buffer < $len) |
|
182
|
0 |
0 |
if $len |
|
187
|
0 |
0 |
if (defined $len and $len == 0) |
|
201
|
0 |
0 |
unless defined $len |
|
208
|
0 |
0 |
if (length $$buffer) |
|
225
|
0 |
0 |
unless (my $req = $self->_request) |
|
229
|
0 |
0 |
unless ($$buffer =~ s/^(.*?\r?\n\r?\n)//ms) |
|
245
|
0 |
0 |
if ($req->header('Host')) { } |
|
261
|
0 |
0 |
if (length $$buffer < $len) |