add 3 months

[Mark Frater]

I'm missing something..

use Date::Manip;
$paidto ="Mon May 19 23:00:00 2003 NZST";
$newpaid = &DateCalc($paidto,"+3 month",\$err);
 print "paidto =$paidto\n";
 print "newpaid = $newpaid\n";

output
paidto =Mon May 19 23:00:00 2003 NZST
newpaid =



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]