in reply to Date::Manip and Date::Calc
Here ia a one liner you could adapt for a cron job.
perl -MDate::Calc=Days_in_Month -e'@l=localtime;printf("Final Day %i\n +",Days_in_Month($l[5]+1900,($l[4]+1)%12))' [download]
cheers thinker