| blib/lib/DateTime/Format/HTTP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 20 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 1 | 3 | unless defined $dt |
| 28 | 1 | 119 | unless defined $str |
| 31 | 1 | 118 | if ($str =~ /^ [SMTWF][a-z][a-z], \ (\d\d) \ ([JFMAJSOND][a-z][a-z]) \ (\d\d\d\d) \ (\d\d):(\d\d):(\d\d) \ GMT$/x) |
| 51 | 60 | 53 | unless (defined $d{'time_zone'}) |
| 53 | 36 | 24 | defined $zone ? : |
| 68 | 5 | 113 | unless @values |
| 71 | 53 | 60 | if (defined $d{'time_zone'}) |
| 72 | 41 | 12 | if $d{'time_zone'} =~ /^(Z|GMT|UTC?|[-+]?0+)$/xi |
| 82 | 1 | 11 | unless defined $dt |
| 93 | 1 | 3 | unless defined $dt |