DateTime vs. POSIX::strftime()

datetime-vs-posix-strftime.pl

use strict;
use warnings;
use Benchmark qw(cmpthese);
use DateTime;
use POSIX;

cmpthese(
    200_000 => {
        'DateTime' => sub {
            DateTime->from_epoch(
                epoch     => time(),
                time_zone => 'Asia/Tokyo'
            )->strftime('%FT%T');
        },
        'POSIX::strftime' => sub {
            POSIX::strftime('%FT%T', localtime);
        },
    }
);

=pod

                    Rate        DateTime POSIX::strftime
DateTime          8807/s              --            -96%
POSIX::strftime 250000/s           2739%              --