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