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