use Date::Manip;

print UnixDate("today","It is %b %e, %Y");