use Test::More;
BEGIN { plan tests => 11 }
use Time::Piece;
my @t = ('2002-01-01 00:00',
'2002-01-01 01:20');
@t = map Time::Piece->strptime($_, '%Y-%m-%d %H:%M'), @t;
ok($t[0] < $t[1]);
ok($t[0] < $t[1]->epoch);
ok($t[0] != $t[1]);
ok($t[0] == $t[0]);
ok($t[0] == $t[0]->epoch);
ok($t[0] != $t[1]);
ok($t[0] <= $t[1]);
ok($t[0] <= $t[1]->epoch);
is($t[0] cmp $t[1], -1);
is($t[1] cmp $t[0], 1);
is($t[0] cmp $t[0], 0);