mysql - 在perl或MySQL中将Unix日期 "Wed Sep 15 14:21:36 2010"转换为unix时间戳以存储在mySQL中

Question

我正在尝试将人类可读格式的常规 Unix 日期转换回 Unix 时间戳，而不为一周中的月份和日期创建数组。显然perl中的“%”需要转义我尝试了“%%”和“\%”以及 RTM，这就是我最终得到\%%

$myDate="Wed Sep 15 14:21:36 2010";
$datePattern="\%%a \%%b \%%e \%%H:\%%i:\%%s \%%Y";

MySQL有一个函数

UNIX_TIMESTAMP (STR_TO_DATE (\'$myDate\' \, \'$datePattern\'))";

我的最终声明如下:该命令直接从 mySQL 运行，但当我从 perl 调用它时则不行。

replace mytable values ('some value', UNIX_TIMESTAMP (STR_TO_DATE (\'$myDate\' \, \'$datePattern\')))";

Answer 1

另一种选择可能是使用 Time::Piece

#!/usr/bin/env perl
use strict;
use warnings;
use Time::Piece;
my $mydate = "Wed Sep 15 14:21:36 2010";
my $mytime = Time::Piece->strptime($mydate, "%a %b %e %H:%M:%S %Y");
print $mytime->strftime("%Y-%m-%d %H:%M:%S\n");