line |
true |
false |
branch |
87
|
10 |
11 |
unless $month
|
89
|
0 |
21 |
unless my $dt = "DateTime"->new("year", $year, "month", $month, "day", $day)
|
93
|
3 |
18 |
if ($month == 1)
|
94
|
1 |
2 |
if $day == 1 and $dt->day_of_week <= 5 or $day == 2 and $dt->day_of_week == 1 or $day == 3 and $dt->day_of_week == 1
|
101
|
3 |
15 |
if ($year == 2011 and $month == 4)
|
102
|
1 |
2 |
if $day == 29
|
105
|
4 |
13 |
if ($month == 5)
|
106
|
1 |
3 |
if $day >= 1 and $day <= 7 and $dt->day_of_week == 1
|
109
|
1 |
1 |
if $year != 2012 and $year != 2022 and ($day >= 25 and $dt->day_of_week == 1)
|
114
|
0 |
15 |
if ($year == 2012 and $month == 6)
|
115
|
0 |
0 |
if $day == 4
|
116
|
0 |
0 |
if $day == 5
|
120
|
2 |
13 |
if ($year == 2022 and $month == 6)
|
121
|
1 |
1 |
if $day == 2
|
122
|
1 |
0 |
if $day == 3
|
125
|
2 |
11 |
if ($year == 2022 and $month == 9)
|
126
|
2 |
0 |
if $day == 19
|
129
|
1 |
10 |
if ($year == 2023 and $month == 5)
|
130
|
1 |
0 |
if $day == 8
|
133
|
1 |
9 |
if ($month == 8)
|
134
|
1 |
0 |
if $day >= 25 and $dt->day_of_week == 1
|
139
|
5 |
4 |
if ($month == 12)
|
140
|
1 |
4 |
if $day == 25 and $dt->day_of_week <= 5 or $day == 26 and $dt->day_of_week == 1 or $day == 27 and $dt->day_of_week == 1
|
145
|
1 |
3 |
if $day == 26 and $dt->day_of_week <= 5 or $day == 27 and $dt->day_of_week <= 2 or $day == 28 and $dt->day_of_week <= 2
|
153
|
1 |
3 |
if &_GoodFriday($year, $month, $day)
|
157
|
1 |
2 |
if &_Easter($e->year, $e->month, $e->day)
|