Ovi*_*vid 24
这实际上取决于你想要做什么,但这里有很多背景知识.
首先,您通常会使用Test :: More或Test :: Simple编写测试程序作为核心测试程序:
use Test::More tests => 2;
is 3, 3, 'basic equality should work';
ok !0, '... and zero should be false';
Run Code Online (Sandbox Code Playgroud)
在内部,调用Test :: Builder将这些测试结果输出为TAP(Test Anything Protocol).Test :: Harness(TAP :: Harness周围的薄包装),读取并解释TAP,告诉您测试是通过还是失败.上面提到的"证明"工具与Test :: Harness捆绑在一起,所以假设将上面的t /目录(标准的Perl测试目录)保存为"numbers.t",然后你可以用这个命令运行它:
prove --verbose t/numbers.t
Run Code Online (Sandbox Code Playgroud)
或者在该目录中运行所有测试(递归地,假设您想要下降到子目录中):
prove --verbose -r t/
Run Code Online (Sandbox Code Playgroud)
( - 当然, - verbose是可选的).
另外,请不要使用TestUnit.许多人推荐它,但它很久以前就被抛弃了,并没有与现代测试工具集成.
| 归档时间: |
|
| 查看次数: |
2787 次 |
| 最近记录: |