| blib/lib/PLP/Tie/Headers.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 36 | 18 | 20 | if ($$self[2] and defined $$self[0]{'Content-Type'}) |
| 38 | 1 | 17 | if $utf8 |
| 42 | 0 | 38 | unless defined($key = $$self[1]{lc $key}) |
| 49 | 1 | 3 | if ($PLP::sentheaders) |
| 55 | 1 | 2 | if (defined $$self[1]{lc $key}) { } |
| 60 | 0 | 3 | if $key eq 'Content-Type' |
| 67 | 0 | 1 | unless defined($key = delete $$self[1]{lc $key}) |