| blib/lib/LBMA/Statistics/Date.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 107 | 9 | 4 | if (@_) { } |
| 114 | 0 | 8 | unless $dt = 'DateTime'->new('year', $year, 'day', $day, 'month', $month, 'locale', 'en_GB') |
| 125 | 0 | 4 | unless $dt = 'DateTime'->now('locale', 'en_GB') |
| 133 | 2 | 10 | if ($year < 1968) |
| 137 | 0 | 10 | unless my $today = 'DateTime'->now('locale', 'en_GB') |
| 139 | 1 | 9 | if ($year > $current_year) |