Alex Tokarev
and 1 contributors


DT - DateTime wrapper that tries hard to DWYM


    use DT qw(:pg);

    my $dt_now = DT->new(time); # Just works
    my $dt_fh = DT->new('2018-02-06T15:45:00-0500'); # Just works

    my ($pg_time_str) = $pg_dbh->selectrow_array("SELECT now();")
    my $dt_pg = DT->new($pg_time_str); # Also just works

    my $timestamp_notz = $dt_pg->pg_timestamp_notz;
    my $timestamp_tz = $dt->pg->pg_timestamp_tz;


DT is a very simple and thin wrapper over DateTime::Moonpig, which in turn is a wrapper over DateTime. DateTime::Moonpig brings immutability and saner operator overloading at the cost of cartoonish name but also lacks date/time parsing capabilities that are badly needed all the time.

There is a myriad of helpful modules on CPAN but oh all that typing!


    use DateTime;
    my $dt = DateTime->from_epoch(epoch => time);

    use DateTime::Format::Pg;
    my $dt = DateTime::Format::Pg->parse_datetime($timestamp_from_postgres);

    use DateTime::Format::ISO8601;
    my $dt = DateTime::Format::ISO8601->parse_datetime($iso_datetime);


    use DT ':pg';
    my $dt_unix = DT->new(time);
    my $dt_pg = DT->new($timestamp_from_postgres);
    my $dt_iso = DT->new($iso_datetime);

DT constructor will try to Do What You Mean, and if it cannot it will fall back to default DateTime constructor. Simple.


One thing that DateTime::Moonpig authors get right is data immutability: any operations on a DateTime object should not mutate original object as this leads to a multitude of potential prioblems.

However the solution presented in DateTime::Moonpig is to throw an exception when a mutator method is called, which is far from Doing What I Mean. Even more, with add_duration and subtract_duration methods rendered effectively unusable the only way to handle date arithmetic suggested is by adding or subtracting the number of seconds from the date which semantically is not the same as adding or subtracting days/months/etc.

A more reasonable approach is to clone the date object, perform the mutation on the copy and return the new object.


The following mutator methods are overridden to return a new DT object instead of performing operations on the original object:

add, add_duration, subtract, subtract_duration, truncate, set, set_time_zone, set_year, set_month, set_day, set_hour, set_minute, set_second, set_nanosecond

Note that set_locale and set_formatter are not overridden. These methods do not affect the actual date/time value so are safe to use.

DT also adds a few useful methods:


A synonym for epoch. No special magic, just easier to remember.


Format $dt object into a string suitable for PostgreSQL TIMESTAMP WITHOUT TIME ZONE type column.


Format $dt object into a string suitable for PostgreSQL TIMESTAMP WITH TIME ZONE type column.


To install this module type the following:

    perl Makefile.PL
    make && make test && make install


DateTime::Moonpig is the parent class for DT. DateTime::Format::ISO8601 is required for parsing ISO8601 date/time formats.

PostgreSQL related methods are optional and depend on DateTime::Format::Pg being installed.


No doubt there are some. Please post an issue on GitHub (see below) if you find something. Pull requests are also welcome.

GitHub repository:


Copyright (c) 2018 by Alex Tokarev <>.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See "perlartistic".