lestrrat-p5 / DateTime-Format-Pg

Other
2 stars 5 forks source link

parse_duration() incorrectly parses nanoseconds #19

Closed siracusa closed 3 years ago

siracusa commented 4 years ago

Failing test below.

#!/usr/local/bin/perl

use strict;
use Test::More;
use DateTime::Format::Pg;

my $duration = DateTime::Format::Pg->parse_duration('7 years 00:00:00.000003');

is($duration->nanoseconds, 3000, 'nanoseconds duration.');

done_testing();

The output is:

not ok 1 - nanoseconds duration.
#   Failed test 'nanoseconds duration.'
#   at datetime_format_pg.pl line 11.
#          got: '3'
#     expected: '3000'
1..1
lestrrat commented 3 years ago

fixed in #17