用于在perl中将数字转换为月份名称的模块

Question

我的XML日期输入是:2012-12-21即YYYY-MM-DD格式.我想将月份数转换为月份名称.即2012-Dec-21任何人都可以建议哪个perl模块是有用的以及如何使用它的例子,因为我对perl非常新.

Answer 1

使用核心perl Time::Piece:

#!/usr/bin/perl

use 5.10;
use strict;
use warnings;

use Time::Piece;

my $date = '2012-12-21';
# strftime format - http://www.unix.com/man-page/FreeBSD/3/strftime/
my $t = Time::Piece->strptime($date, '%Y-%m-%d');
say $t->month;                # Dec
say $t->strftime('%Y-%b-%d'); # 2012-Dec-21