http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git/tree/lib/PublicInbox/Hval.pm
$str ; } # for the t= query parameter passed to overview DB sub ts2str ($) { strftime ( ' %Y %m %d %H %M %S ' , gmtime ( $_ [ 0 ])) }; # human-friendly format sub fmt_ts ($) { # strftime %k is not portable and leading zeros in %H slow me down my ( undef , $M , $H , $d , $m , $Y ) = gmtime $_ [ 0 ]; sprintf ' %u - %02u - %02u % 2u: %02u ' , $Y + 1900 , $m + 1 , $d , $H , $M ; } sub utf8_maybe ($) { utf8 :: decode ( $_ [ 0 ]); utf8 :: valid ( $_ [ 0 ]) or utf8 :: encode ( $_ [ 0 ]); # non-UTF-8 data exists }...