Perl有没有好的自动化测试套件？

有人可以为Perl建议一些好的自动化测试套件框架吗？

这实际上取决于你想要做什么,但这里有很多背景知识.

首先,您通常会使用Test :: More或Test :: Simple编写测试程序作为核心测试程序:

use Test::More tests => 2;

is 3, 3, 'basic equality should work';
ok !0, '... and zero should be false';

在内部,调用Test :: Builder将这些测试结果输出为TAP(Test Anything Protocol).Test :: Harness(TAP :: Harness周围的薄包装),读取并解释TAP,告诉您测试是通过还是失败.上面提到的"证明"工具与Test :: Harness捆绑在一起,所以假设将上面的t /目录(标准的Perl测试目录)保存为"numbers.t",然后你可以用这个命令运行它:

prove --verbose t/numbers.t

或者在该目录中运行所有测试(递归地,假设您想要下降到子目录中):

prove --verbose -r t/

( - 当然, - verbose是可选的).

另外,请不要使用TestUnit.许多人推荐它,但它很久以前就被抛弃了,并没有与现代测试工具集成.

查看CPAN测试人员,他们拥有大量自动化测试工具.其中大部分都应该在CPAN上,这样您就可以对其进行修改以满足您的需求.使用TAP :: Harness编写自己的测试人员也很容易.

您究竟需要做什么以及如何将其融入您的流程？

只要您使用生成TAP(测试任何协议)输出的测试,您可能会发现这很有用:http://sourceforge.net/projects/smolder

你见过闷烧吗？

"开发人员和测试人员使用Smoke Test Aggregator上传(自动或手动)并使用Test Anything Protocol查看烟雾/回归测试.详细信息和趋势图表以及通过电子邮件或Atom供稿提供的通知."