| blib/lib/Hypersonic/Protocol/HTTP1.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 16 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 37 | 9 | 28 | $body =~ /^\s*[\[{]/ ? : |
| 40 | 23 | 14 | $keep_alive ? : |
| 46 | 37 | 0 | if $security_headers |
| 50 | 0 | 2 | if $h eq "Content-Type" or $h eq "Content-Length" or $h eq "Connection" |
| 94 | 12 | 2 | if ($analysis->{'single_method'}) |
| 127 | 2 | 3 | if ($first) { } |
| 177 | 1 | 2 | if ($opts{'has_body_access'}) { } |
| 338 | 2 | 7 | unless defined $data and length $data |