perl -MDate::Manip -le \
     'print UnixDate DateCalc(ParseDate("@ARGV"), "+1m -1d"), "%e"'