Perl相当于PHP的strtotime()？

Question

我意识到Perl有strftime,它允许你传递一个格式化对象.我想知道我能找到的功能更像是以下(来自PHP):

$string1 = "Jun 6, 2012";
$string2 = "June 06 2012";
if (strtotime($string1) == strtotime($string2)) {
  echo "BLAMMO!";
}
// will echo "BLAMMO!"

其原因是业务需求,其中需要比较用户提供的日期以用于验证和扩展逻辑(此日期是否也在提供的另一个日期范围内等).现在,我意识到我可以编写一个专门用于执行此操作的完整库,并且我意识到日期解析存在任何潜在的陷阱,您永远不应该信任用户输入,但这里有一些基本的假设.

1. 输入实际上是从符合其内部日期格式规范的任何数量的软件包中输出的.它们都遵循一些标准,但这些标准在程序之间没有统一规范化.话虽这么说,我应该总是比较同一个程序中的两个日期,但我可能永远不知道它们可能遵循的格式.
2. 我意识到任何给定系统的标准可能会有所不同,但这里的假设是我们将所有日期都提供给同一个东西,因此我们可以信任一致的实现,希望CPAN或其他容易更新的模块.

Answer 1

Date :: Parse耗材str2time,这样做.

该文档列出了该模块可以解析的一些示例:

 1995:01:24T09:08:17.1823213           ISO-8601
 1995-01-24T09:08:17.1823213
 Wed, 16 Jun 94 07:29:35 CST           Comma and day name are optional 
 Thu, 13 Oct 94 10:13:13 -0700
 Wed, 9 Nov 1994 09:50:32 -0500 (EST)  Text in ()'s will be ignored.
 21 dec 17:05                          Will be parsed in the current time zone
 21-dec 17:05
 21/dec 17:05
 21/dec/93 17:05
 1999 10:02:18 "GMT"
 16 Nov 94 22:28:20 PST 

Answer 2

Perl中日期/时间操作的标准是DateTime项目.

https://metacpan.org/pod/DateTime