如何在Perl中解析JSON日期格式？

在Perl中解析JSON日期格式，可以使用JSON模块和DateTime模块。首先，确保已经安装了JSON和DateTime模块。如果没有安装，可以使用以下命令安装：

cpan install JSON
cpan install DateTime

接下来，可以使用以下代码解析JSON中的日期格式：

use strict;
use warnings;
use JSON;
use DateTime;

my $json_string = '{"date": "2022-01-01T00:00:00"}';
my $json = JSON->new->decode($json_string);

my $date_string = $json->{date};
my $dt = DateTime->from_epoch( epoch => time );

$dt = DateTime::Format::ISO8601->parse_datetime($date_string);

print "Parsed date: " . $dt->ymd . "\n";

在这个例子中，我们首先使用JSON模块将JSON字符串解码为Perl哈希。然后，我们使用DateTime模块将日期字符串解析为DateTime对象。最后，我们将解析后的日期打印出来。

如果您需要处理更复杂的日期格式，可以使用DateTime模块提供的各种方法和选项。