line |
true |
false |
branch |
83
|
0 |
7 |
unless blessed $message |
84
|
7 |
0 |
if ($message->isa('HTTP::Response')) |
86
|
7 |
0 |
if ($message->request) |
91
|
7 |
0 |
if ($message->isa('HTTP::Request')) |
112
|
1 |
6 |
if $request->method =~ /^(GET|HEAD|DELETE)$/ and $request->content |
115
|
1 |
6 |
if ($request->protocol || 'HTTP/1.0') eq 'HTTP/1.1' and not defined $request->header('Host') |
118
|
1 |
6 |
unless $request->header('Accept') |
137
|
0 |
7 |
if defined $response->content_length and $response->content_length != length $response->content |
140
|
2 |
1 |
if ($response->protocol || 'HTTP/1.0') eq 'HTTP/1.1' and not $response->code == 204 and not $response->code == 304 and not defined $response->content_length and ($response->header('Transfer-Encoding') || '') ne 'chunked' |
146
|
1 |
6 |
if $response->content and not defined $response->header('Content-Type') |
149
|
0 |
7 |
if $response->content and $response->code =~ /^[23]04$/ |
152
|
1 |
6 |
if $response->code =~ /^(201|3\d\d)$/ and not defined $response->header('Location') |
155
|
1 |
6 |
if $response->code == 401 and not defined $response->header('WWW-Authenticate') |
158
|
0 |
7 |
if $response->code == 407 and not defined $response->header('Proxy-Authenticate') |
161
|
1 |
6 |
if $response->code == 503 and not defined $response->header('Retry-After') |
164
|
0 |
7 |
if defined $response->header('Refresh') |
166
|
2 |
5 |
if $response->code == 405 and not defined $response->header('Allow') |
169
|
0 |
0 |
if $response->code eq 206 and not $response->header('Content-Range') and !($response->header('Content-Type') || '') eq 'multipart/byteranges' |
173
|
3 |
4 |
if $response->code =~ /^2\d\d$/ and not $response->header('Date') |
194
|
1 |
6 |
if ($request->protocol || 'HTTP/1.0') eq 'HTTP/1.0' and ($response->protocol || 'HTTP/1.0') eq 'HTTP/1.1' |
197
|
1 |
6 |
if $request->method =~ /^(GET|HEAD|TRACE|OPTIONS)$/ and $response->code == 201 |
200
|
1 |
6 |
if $request->method eq 'HEAD' and $response->content |
203
|
0 |
7 |
if $request->method eq 'TRACE' and ($response->header('Content-Type') || '') ne 'message/http' |
206
|
0 |
7 |
if $response->code eq 206 and not defined $request->header('Range') |
209
|
0 |
7 |
if $response->code eq 411 and $request->header('Content-Length') |
212
|
0 |
7 |
if $response->code eq 416 and not $request->header('Range') |
227
|
0 |
0 |
unless $self->isa('HTTP::Lint::Message') |
231
|
0 |
0 |
ref $self eq 'HTTP::Lint::Error' ? : |
|
0 |
0 |
@{$$self[1];} ? : |