Is this the simplest way of determining the days between 3/30 and today?

    use DateTime;

    my $jf = DateTime->new(year  => 2006,
                           month => 3,
                           day => 30);

    my $ff = DateTime->today();

    my $days = 0;

    for(my $dt = $jf->clone();
        $dt <= $ff;
        $dt->add(days => 1)
    ) {
        $days++;
    }

    print "$days\n";

I tried the FAQ and the closest question I found there is "How can I
calculate the difference in days between dates, but without counting
Saturdays and Sundays?". The answer is marked "TODO":

    http://datetime.perl.org/index.cgi?FAQSampleCalculations

-- Mike

Mike Schilli
[EMAIL PROTECTED]

Reply via email to