use Time::Local;
print "last day" if (((localtime(time()+60*60*24))[3]) < 2);
[download]

Just a bit of fun.