rt29635.t   [plain text]


use strict;
use Test::More (tests => 4);

BEGIN
{
    use_ok("DateTime::Format::Pg");
}

my $dt = DateTime::Format::Pg->parse_time('16:05:00');

is($dt->hour, 16);
is($dt->minute, 5);
is($dt->second, 0);