X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FHval.pm;h=fb21041acafcaa534c3563a1f191f902acc631df;hp=e21a64a60e6690636555c2d7dc52473301ba5d25;hb=6c853f5256f3a324c018a37a9e8a6b9fc8fdc063;hpb=29c5f2a6fc3b86306a5dbeadfae061d06f2bc6dd diff --git a/lib/PublicInbox/Hval.pm b/lib/PublicInbox/Hval.pm index e21a64a6..fb21041a 100644 --- a/lib/PublicInbox/Hval.pm +++ b/lib/PublicInbox/Hval.pm @@ -10,7 +10,8 @@ use Encode qw(find_encoding); use PublicInbox::MID qw/mid_clean mid_escape/; use base qw/Exporter/; our @EXPORT_OK = qw/ascii_html obfuscate_addrs to_filename src_escape - to_attr prurl mid_href/; + to_attr prurl mid_href fmt_ts ts2str/; +use POSIX qw(strftime); my $enc_ascii = find_encoding('us-ascii'); # safe-ish acceptable filename pattern for portability @@ -123,4 +124,10 @@ sub to_attr ($) { $first . $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('%Y-%m-%d %k:%M', gmtime($_[0])) } + 1;