perl - 如何在 Perl 中将字符串解析为 DateTime 对象？

Question

我知道 DateTime Perl 模块，以及许多 DateTime::Format:: 模块来解析特定类型的日期/时间格式。但是，鉴于日期/时间字符串的一些示例，我如何确定(在编码/设计时，而不是在运行时)我应该使用哪个特定模块？

例如，我想解析如下字符串:October 28, 2011 9:00 PM PDT
是否有最常见的日期/时间格式的列表，我可以在其中查找并找到最合适的模块？

我也知道一些模块试图在运行时“猜测”每个给定字符串的格式并尽力而为。但是，对于敏感的应用程序，我想在设计应用程序时首先确定(尽可能严格)格式，然后使用一个模块，如果字符串与指定的格式不匹配，它会警告我。

我该怎么办？

Answer 1

DateTime::Format::Strptime获取日期/时间字符串并将它们解析为 DateTime 对象。

#!/usr/bin/perl

use strict;
use warnings;

use DateTime::Format::Strptime;

my $parser = DateTime::Format::Strptime->new(
  pattern => '%B %d, %Y %I:%M %p %Z',
  on_error => 'croak',
);

my $dt = $parser->parse_datetime('October 28, 2011 9:00 PM PDT');

print "$dt\n";

模式中使用的字符序列是 POSIX 标准的。有关详细信息，请参阅“man strftime”。