$date_string = "Jun 03 19:49:27 2018"; $fmt = '%b %d %H:%M:%S %Y'; $time=Time::Piece->strptime( $date_string, $fmt ); $time->[10] = 1; print $time->strftime() ."\n"; ... So, 03 Jun 2018 19:49:27 CEST