Help for this page

Select Code to Download


  1. or download this
    perl -MTime::Piece -le'$t=localtime->strptime(shift,"%Y%m%d");print "l
+ast day" if $t->mday == $t->month_last_day' 20010731
  2. or download this
    perl -MTime::Piece -le"$t=localtime->strptime(shift,'%Y%m%d');print 'l
+ast day' if $t->mday == $t->month_last_day" 20010731