The obvious answer would be to add one to the month, because as the Perl documentation for localtime() dictates, the numerical value of the month is from 0 to 11, not 1 to 12. How did you know to add 1900 to the year?

japhy -- Perl and Regex Hacker