| blib/lib/Date/Maya.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 28 | 28 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 61 | 1 | 27 | unless @_ |
| 65 | 1 | 26 | unless defined $julian |
| 66 | 1 | 25 | if $julian =~ /\D/ |
| 69 | 1 | 24 | if $days < 0 |
| 76 | 24 | 96 | if $$part[0] eq 'baktun' |
| 82 | 18 | 6 | if $results[0] == 0 |
| 86 | 12 | 12 | unless (wantarray) |
| 94 | 1 | 11 | if $tzolkin_day == 0 |
| 102 | 2 | 10 | if ($haab_y_day >= $haab_year_length) { } |
| 116 | 1 | 12 | unless @_ |
| 120 | 1 | 11 | unless defined $maya |
| 124 | 1 | 10 | unless 5 == @parts and not grep({/\D/;} @parts) |
| 126 | 5 | 5 | if $parts[0] == $max_baktun |
| 133 | 2 | 43 | if ($part >= $$date_parts[$i][1]) |