mysql - Perl - 将日期从 YEAR-MM-DD 转换为 MONTH、DD、YEAR

<分区>

我正在从格式为 YEAR-MM-DD 的数据库中提取一个字符串，即 2013-2-24 并需要以 的格式将其打印在网页上>Month, DD, YEAR 即 2013 年 2 月 24 日

我必须使用 perl 来执行此操作，但我是该语言的新手。到目前为止，我认为我需要将月份数字转换为类似这样的字符串:

 my @months = ("January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December")

并从数据库中提取数据:

{Table}->get('date')

但我不确定如何将所有这些放在一起，我们将不胜感激。

我已经做到了:但它似乎不起作用。

use Date::Format;
@date = {Table}->get('date')
$date->time2str("%B %d %Y", @date);
print date;

也许是因为它在数据库中的格式而失败了？ yyyy-mm-dd ，破折号会导致它失败吗？我需要先将它转换成数字还是什么？

最佳答案

使用 Time::Piece :

use strict;
use warnings;

use Time::Piece;

my $date = '2013-2-24';

print Time::Piece->strptime($date, '%Y-%m-%d')->strftime("%B %d, %Y"), "\n";

输出:

February 24, 2013

关于mysql - Perl - 将日期从 YEAR-MM-DD 转换为 MONTH、DD、YEAR，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/26150915/

相关文章：

SQL Server 删除所有超过 10 分钟的行