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