Re: [MacPerl-AnyPerl] input to formatted date
[email protected] ("John Murray") Mon, 12 Mar 2001 21:31:47 +1100
| Newsgroups | perl.macperl.anyperl |
|---|---|
| Message-ID | <07a601c0aadf$a5689f60$445323cb@opalintel> |
> if ($year % 4) = 0{$complete_months_contribution ++};
oops ... this will only get incremented if we are into march and it is a
leap year, so we'll need to test if $monthnum > 2 as well:
if ( ($year % 4 = 0 ) && ($monthnum > 2) ){$complete_months_contribution
++};