Hatena::Groupsubtech

名称未設定♥

 | 

2008-05-09

autobox-Numeric-Time と autobox-Numeric-Bytes

14:34 |  autobox-Numeric-Time と autobox-Numeric-Bytes - 名称未設定♥ を含むブックマーク はてなブックマーク -  autobox-Numeric-Time と autobox-Numeric-Bytes - 名称未設定♥

TTLの計算でecho '1.5*60*60*24'|bcとかやるのにうんざりしていたところで、(railsの?) ActiveSupport::CoreExtensions::Numeric::Time の1.5.daysに深い感銘を受けたので、Perlautoboxを使って実装しようと思ったら既にmiyagawaさんがautobox::DateTime::Durationというの(秒数じゃなくてDateTime::DurationとかDateTimeのインスタンスを返す)を作ってたんすけど気にせず書いてみたのがこれ、で、ついでに2->petabytesとか扱えるようにする::Bytesも作ってみたりしました。

$ ./samples/unitary '2->days'
172800
$ ./samples/unitary '2->megabytes' 3.petabytes
2097152
3377699720527872
トラックバック - http://subtech.g.hatena.ne.jp/hirose31/20080509
 |