On Thu, Feb 07, 2002 at 12:19:01AM -0500, Bill -OSX- Jones wrote:
> Hi :)
> 
> I was asked recently if I could write a Perl program that
> would find out when the next time Christmas day would
> actually be on a Sunday.

#!perl

use Date::Christmas qw/ christmasday /;

for my $year (1900 .. 2100) {
    print "Christmas found on a Sunday in $year"
      if christmasday($year) eq 'Sunday';
}

__END__

:)


Ronald

Reply via email to