"Perl DateTime strftime 格式化"

Question

我正在开发一个涉及与第 3 方 API 集成的项目。 作为合同的一部分，我需要在 ISO 格式中包含一个 UTC 日期字符串：

yyyy-MM-ddTHH:mm:ss.sssZ

我一直在尝试 re.pl 中的一些选项来生成上述格式的日期字符串。 到目前为止，我能够想出这个：

use DateTime;

my $now_utc = DateTime->now(time_zone => 'UTC');

my $now_iso_format = $now_utc->strftime('%Y-%m-%dT%H:%M:%S.%sZ');

当我在 re.pl 中执行这些行时，我得到以下格式的日期字符串：

2022-02-07T03:55:22.1644206122Z

我的问题是，如何将精度限制为毫秒？ 如您所见，现在是纳秒级。

Answer 1

详细信息列在strftime 模式<\/a>页面上， %N<\/code>用于小数秒数

.. -> strftime('%Y-%m-%dT%H:%M:%S.%3NZ');