use Class::Date qw(date -DateParse);
$Class::Date::DATE_FORMAT="%Y/%m/%d %H:%M:%S";
print date('2008/01/01 10:00:00') + 300, "\n", date('2008-01-01 10:00:00') + '5m';