use Test::Simple tests => 2;
use Date::Parse;
my $time1 = str2time "2008/11/22 01:40:00.000";
my $time2 = str2time "2008/11/22 01:40:00.000";
ok(defined $time1 && defined $time2);
ok($time1 == $time2);