Perl DateTime strftime formatting-CodePudding

I'm working on a project which involves integrating with a 3rd party API. As part of the contract, I need to include a UTC date string in the ISO format:

yyyy-MM-ddTHH:mm:ss.sssZ

I've been trying a few options in re.pl to generate a date string in the above format. So far I'be been able to come up with this:

use DateTime;

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

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

When I execute these lines in re.pl, I get the date string in the format:

2022-02-07T03:55:22.1644206122Z

My question is, how do I limit the precision to milliseconds? AS you can see, right now its nanoseconds.

CodePudding user response：

Details are listed on strftime patterns page and %N is for fractional seconds digits

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