| blib/lib/HTTP/Request/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 17 | 22 | 77.2 |
| line | l | !l | condition |
|---|---|---|---|
| 47 | 6 | 5 | do { $ct eq 'form-data' } && do { $ct = 'multipart/form-data' } |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 36 | 2 | 12 | 8 | @_ and ref $_[0] |
| 124 | 3 | 1 | 1 | $content and not defined $req->header("Content-Length") |
| 152 | 1 | 0 | 3 | defined $usename and length $usename |
| 218 | 0 | 0 | 1 | -f $f and $file_size = -s _ |
| 239 | 0 | 1 | 0 | defined $length and $length != 0 |
| 245 | 1 | 1 | 8 | @parts and not ref $parts[0] |
| line | l | !l | condition |
|---|---|---|---|
| 299 | 1 | 4 | shift() || (return 'xYzZY') |