my $time_ago = strftime "%Y/%m/%d %H:%M:%S",
    localtime timelocal_nocheck $s, $m, $h - $hrs, $d, $mon, $y;