Log::Minimalの出力先をファイルに変更するLog::Minimal::Fileを書いてみた

配布場所

github https://github.com/ysasaki/p5-log-minimal-file

インストール

git clone git://github.com/ysasaki/p5-log-minimal-file.git
cd p5-log-minimal-file
cpanm .

作成した理由

Log::Minimalの手軽さがナイスだったのですが、出力先をファイルに変更するのがめんどうだったので作成しました。

使い方

Log::Minimal::File->guard($filename)を呼ぶとguardオブジェクトが返ってきて、
guardオブジェクトが消えるまでは指定したファイルに書きこまれます。

    use strict;
    use warnings;
    use Log::Minimal;
    use Log::Minimal::File;
 
    infof("send to STDOUT");
 
    my $guard = Log::Minimal::File->guard('/tmp/your.log');
    infof("send to your.log");
    undef $guard;
 
    infof("send to STDOUT");

TODO

• Log::Minimal::Fileの名前で大丈夫か？
• 別途Log::Minimalをuseするのはなんかカッコ悪い
• 実装方法がいまいちな気がする