sub timediff($) { use Time::Piece; use Time::Piece::MySQL; use Time::Duration; my $time = Time::Piece->from_mysql_timestamp( $_[0] ); my $now = localtime; my $diff = ago ($now->epoch() - $time->epoch(), 1); return $diff; }