use Date::Manip; print UnixDate('05/1/13 16:45 GMT', '%b %d %Y %T %Z');