Mysql SQL和perl时间格式

我似乎想不出一种方法来用perl格式化字符串，以便在MySQL DateTime（）字段中使用

我需要格式化时间，以便可以将其输入MySQL DateTime（）字段

我计划使用PerlMySQL模块来输入这个

   $createQuery = "INSERT INTO something (dated) Values(?) ";
   $sqlQuery = $dbh->prepare($createQuery);
   $sqlQuery->execute($time);

---

你不必自己做任何格式化

$time = time;
$createQuery = "INSERT INTO something (dated) Values( FROM_UNIXTIME( ? )) ";
$sqlQuery = $dbh->prepare($createQuery);
$sqlQuery->execute($time);

如果您确实需要一个字符串，并且您的数据源不是unix时间戳，那么只需使用以下任何一种方法

---

您可以使用core模块，该模块自5.9以来一直是Perl core的一部分

---

如果您没有perl 5.9，将对您进行排序：

$date_as_mysql_likes = UnixDate(ParseDate($your_date_here), '%Y-%m-%d %H:%M:%S');

---

也许其中一个会有帮助。谢谢你，这起作用了。我只是写了一个函数来正确格式化它，它工作了

$time = time;
$createQuery = "INSERT INTO something (dated) Values( FROM_UNIXTIME( ? )) ";
$sqlQuery = $dbh->prepare($createQuery);
$sqlQuery->execute($time);

$time = '2013-06-29 18:50:00';
$createQuery = "INSERT INTO something (dated) Values( FROM_UNIXTIME( ? )) ";
$sqlQuery = $dbh->prepare($createQuery);
$sqlQuery->execute($time);

use Time::Piece;
my $time = q(Sat Jun 29 11:20:39 2013 -0400);
my $t = Time::Piece->strptime($time, '%a %b %d %H:%M:%S %Y %z');
print $t->strftime("%Y-%m-%d %H:%M:%S\n");

$date_as_mysql_likes = UnixDate(ParseDate($your_date_here), '%Y-%m-%d %H:%M:%S');