You could try Date::Calc as it has some good functions for comparing Time / Dates. I have used it many times.

Might be something that will help you in there.

The other thing that you could try is to convert the Date / Time into Epoc seconds which I find much easier to then run checks on.

Al