blib/lib/DateTime/Format/Roman.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 30 | 32 | 93.7 |
line | true | false | branch |
---|---|---|---|
26 | 2 | 1 | unless ref $p{'pattern'} |
55 | 4 | 16 | unless (ref $self) |
68 | 104 | 0 | $formats{$3} ? : |
70 | 8 | 48 | unless wantarray |
78 | 16 | 88 | if ($extra eq 'O') { } |
4 | 84 | elsif ($extra eq 'o') { } | |
79 | 3 | 12 | $2 ? : |
81 | 1 | 3 | $2 ? : |
95 | 3 | 17 | if ($d == 1) { } |
5 | 12 | elsif ($d <= $nones) { } | |
4 | 8 | elsif ($d <= $ides) { } | |
107 | 5 | 3 | if ($dt->is_leap_year and $m == 2) |
108 | 1 | 4 | if ($day > 7) { } |
3 | 1 | elsif ($day == 7) { } | |
116 | 1 | 7 | if ($m > 12) |
128 | 0 | 6 | if $m == 3 or $m == 5 or $m == 7 or $m == 10 |