NeverBlog::Likk::Unexistable;

見なかったことにして下さい

[Perl] 美人なClockうんぬん

大体こんな流れ
ruby http://d.hatena.ne.jp/Yamashiro0217/20090310/1236674979

bash,zsh http://d.hatena.ne.jp/sugyan/20090311/1236703604 (削除されました)

python http://d.hatena.ne.jp/jYoshiori/20090311/1236768388

あれ、perlは?どうせならワンライナーにするか

http://wassr.jp/user/likk/statuses/ZD2VuvVT0m
http://wassr.jp/user/sugyan/statuses/G7hjXTtzcx
 └http://wassr.jp/user/likk/statuses/x3Bvs4W8P5
  └http://wassr.jp/user/sugyan/statuses/YF5jkR3kRP

という流れになったので、→ http://li.que.jp/tmp/BijinTokei.pm

http://wassr.jp/user/likk/statuses/Y5jq9sHuMt
 └http://wassr.jp/user/likk/statuses/RAJbgLwspK
 └http://wassr.jp/user/likk/statuses/O5JaBwXpQg

http://wassr.jp/user/likk/statuses/ligv8SJMA4

http://wassr.jp/user/likk/statuses/D938ufOPo3 ←いまここ

コードレポスの lang/perl/WWW-BijinTokei にコミットしました。

軽く使い方だけ置いときますね。

#ワンライナーで現時刻取得
$ perl -MWWW::BijinTokei -e 'WWW::BijinTokei->new->get'
# 特定の時刻
$ perl -MWWW::BijinTokei -e 'WWW::BijinTokei->new->get(q{0120})'
# 毎分自動で1日かけて
$ perl -MWWW::BijinTokei -e 'WWW::BijinTokei->new->allget'

特に最後は普通のアクセスと一緒ですよ、普通のアクセスだってば!
http://wassr.jp/user/likk/statuses/jqqreLUzvj