use Date::Manip::Date; my $obj = new Date::Manip::Date; $obj->parse('2017-07-20T06:43:50.330Z'); my $obj1 = new Date::Manip::Date; $obj1->parse('2018-08-20T06:46:56.147Z'); my $delta = $obj1->calc($obj);