hello duncan
what about the perl date module
what I did not understand in your answer is
($seconds, $minutes, $hour, $dayOfMonth, $month, $year, $dayOfWeek, $dayOfYear) = localtime(time);
print "current dayOfMonth is: $dayOfMonth\n";
$month ++;
print "current month is: $month\n";
$year +=...