Branch Coverage

blib/lib/DateTime/Calendar/Discordian.pm
Criterion Covered Total %
branch 64 64 100.0


line true false branch
184 10 207 if ($day =~ /$tibsday/) { }
205 3 elsif ($day > 0 and $day < 74) { }
185 9 1 unless (defined $$opts{'season'})
201 206 5 if (defined $season)
220 203 10 if (defined $args{'season'}) { }
225 1 9 unless ($args{'day'} =~ /$tibsday/)
229 9 203 if ($args{'day'} =~ /$tibsday/)
232 2 210 if $args{'day'} eq q[St. Tib's Day] and not _is_leap_year($args{'year'} - 1166)
238 3 207 if (defined $$self{'locale'})
239 1 2 unless (ref $$self{'locale'})
282 1 34 if ($$self{'day'} eq q[St. Tib's Day])
300 1 35 if $$self{'day'} eq q[St. Tib's Day]
344 73 1 if ($args{'object'}->can('set_time_zone'))
373 1 3 if $$self{'day'} == 5
375 2 1 if $$self{'day'} == 50
518 47 1 $$self{'day'} eq q[St. Tib's Day] || $$self{'day'} != 5 && $$self{'day'} != 50 ? :
522 3 45 $$self{'day'} eq q[St. Tib's Day] ? :
526 134 1 $formats{$1} ? :
527 46 2 unless (wantarray)
564 7 68 if $day % 10 == 1 and $day != 11
565 7 61 if $day % 10 == 2 and $day != 12
566 7 54 if $day % 10 == 3 and $day != 13
587 7 203 $$self{'day'} eq q[St. Tib's Day] ? :
594 68 110 _is_leap_year($yr + 1) ? :
32 178 $day_of_year <= 60 ? :
602 903 89 $ix <= $x ? :
631 5 69 $d4 == 0 ? :
639 3 71 if ($d4 == 60 and _is_leap_year($year - 1166)) { }
646 5 66 $d4 == 0 ? :
648 5 66 $d4 == 0 ? :
650 24 47 if ($d4 > 60 and _is_leap_year($year - 1166))
654 12 59 if ($day < 1)