in reply to time elapsed from set time

Time::ParseDate might help.

In Section Seekers of Perl Wisdom