my $k = $y % 100; my $j = int($y / 100); my $d = 28 - (5 + $k + ($k>>2) + ($j>>2) - 2*$j) % 7; [download]
In reply to Re: Calculating holidays by Anonymous Monk in thread Calculating holidays by htmanning