What about DateTime::Format::Human ?

edit

or DateTime::Format::Human::Duration ?

update

using https://grep.metacpan.org/ with dists starting with ^DateTime.* ending on *.pm and matching permutations of yesterday last week ago produced

• DateTime::Duration::Fuzzy
• DateTime::Format::Natural
• and more.

unfortunately grep-metacpan was often not reliable in listing the matches, so I gave up searching for more.

Nice! Good tip... Thanks for all replies - I am on my way again...

Since your example strings are all relative and in the past I would suggest starting with Time::Duration::ago.

Hi, I use and can recommend Time::Ago.

use Time::Ago;
print Time::Ago->in_words($dt->epoch), "\n";
[download]

Not quite what you want, but maybe interesting: Approximate time