Test::CallCounter だした

@tokuhirom++ “@soh335: @xaicron mock::guard よく使ってるんですけど、呼ばれた回数だけカジュアルに取れるのが ( cpan に ) あるといいですね！” — さいくろん (@xaicron) April 4, 2013

use Test::CallCounter;
 
my $counter = Test::CallCounter->new(
    'LWP::UserAgent' => 'get'
);
 
my $ua = LWP::UserAgent->new();
$ua->get('http://d.hatena.ne.jp/');
 
is($counter->count(), 1);

去年ぐらいにかいた Test::CallCount っていうゆるふわモジュールがあったけどまだリリースしてなかったんですが、だせといわれたので full rewriteしてだしました。

単純なモジュールなのに一年たつと実装の方法をかえたくなるのが不思議なものですね。

まあ、そんなかんじです。

Published: 2013-04-04(Thu) 09:28