Test::Declare

最近会社のプロジェクトでもテストがないと
すごい勢いでDISられるのでがんばって書いている今日この頃です。
ただやっぱりテストがあると、機能変更とかやりやすくなって
精神安定剤にもなていいですね。
test++

さてPerlでテスト書く時ってTest::Baseがかなり便利で
基本Test::Baseで書いておけばいいのですが、
id:tokuhiromがでくれあ期のときに触発されて書いてみたのを
さっきcodereposにあげてみました。

基本Test::Moreのラッパーです。

http://coderepos.org/share/browser/lang/perl/Test-Declare/lib/Test/Declare.pm

plan tests => blocks;
describe 'foo bar test' => run {
    init {
        # init..
    };
    test 'foo is bar?' => run {
        is foo, bar;
    };
    cleanup {
        # cleanup..
    };
};

まあこんな感じで
describeで大まかなブロックをつくって
initブロックで前処理して
testブロックでテストして
cleanupブロックで後処理させる
感じです。

plan tests => blocks;

の部分はTest::Baseインスパイアで
テストコード内のtestブロックの数を数えてくれます。

少しでも皆さんのテスト生活が快適になりますように！

Perl Testing: A Developer's Notebook (Developers Notebook)

posted with amazlet on 08.03.27

Ian Langworth Chromatic
Oreilly & Associates Inc (2005/08)
売り上げランキング: 44

Amazon.co.jp で詳細を見る