Test::Baseと数字のテスト - Practice of Programming
Test::Baseを使ってみてます。とても簡単。 use Test::Base; run_is; __END__ === --- i A --- e A意味はないけど。ミニマムだとこんなんでいい。 入力: A+改行 出力: A+改行 が、同じなので、テストはOK。run_is は「同じ」のテストです。 普通は、run_is i => 'e'; などと書きますが、別にそう書かなくても、Test::Baseは推測してくれます。 で、数字のテストをしてみました... use Test::Base; sub hoge{ $_[0] / 10;} filters { i => [ 'chomp', 'hoge'], e => [ 'chomp'], }; run_is i => 'e'; __END__ === sippai dayo --- i 1000 --- e 100これは、入力にフィルタ
Extending Test::Base - Ktat's Wiki
Test::Baseで自分好みのTestクラスを作る 著者:加藤 敦 最終更新時間：2009年04月14日 19時17分33秒 自己紹介id:ktat Wano株式会社 テストおさらいどうしてテストが必要か？ リファクタリングしやすい メソッドの仕様が明確になる 信頼性をチェックすることが出来る（Deve::Coverとか） Test::More#!/usr/bin/perl use Test::More tests => 5; BEGIN{use_ok("CGI");} is(ref(my $q = CGI->new), 'CGI', 'create CGI object'); is($q->param('hoge', 'hoge'), 'hoge', 'store hoge and return hoge'); $q->param('array', 1 .. 5); is_deeply
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
wiz-perl
