http://www.perlmonks.org?node_id=1075348


in reply to time change

You could probably use Time::Mock or Test::MockTime.