[perl]Algorithm::Bayonなぞ作ってみた

 お久しぶりです。色んなものを作りかけたまま放置してしまってすいません><
 ぼちぼち収拾していきますので。
 そう言いつつ、またなんか作ってしまったのですが。
 不肖私、mixiの方が作った"bayon"というクラスタリングツールを今更になって触ってみたところ、あまりの速さに感動してしまったので、弊社某サービスで使っているAlgorithm::Clusterからのスイッチを狙っています。
 とはいえ、bayonの入出力の形式はtsv(しかも出力は標準出力)なので、Perlから直で扱うにはちと不便。なので、コマンドラインのラッパーとIOまわりをある程度抽象化してまとめたツールをこしらえました。それが表題のAlgorithm::Bayonです。
 →http://github.com/taiyoh/algorithm-bayon-perl/tree/master
 例によって俺クオリティの影響でドキュメントは皆無ですが、テストは多少書いたので、使い方についてはそちらと実際のソースを見て把握していただければ嬉しいです。大したこと全然やってないし。