Well, that's certainly an argument for commenting your code as you write it.

DateTime::Set may help some.