先程のエントリに続き、またも「perl cpanモジュールガイド」から。
viewvcやtracでは、commitからの経過時間を?日前や?ヶ月前のように表示しますが、
perlでは、Time::Duration::ja が、これを実現してくれるようです。
tracの例
perl src
#!/usr/local/bin/perl use strict; use Time::Duration::ja; main(); sub main { print earlier(0),"\n"; print earlier(300),"\n"; print earlier(30000),"\n"; print earlier(300000),"\n"; }