在积累了足够的测试以运行它们都需要一些实时之后,我查看了 Test::Class::Load
doc找到运行单个测试类的技巧。它提供了一种方法来做到这一点,但我一定错过了一些东西,因为我无法让它工作。这是我所拥有的:
我的测试目录:
drewfus:~/sandbox$ ls t/
lib/ perlcriticrc PerlCritic.t Unit.t
t/Unit.t
包括以下内容:use strict;
use warnings;
use Test::Class;
use Test::More 'no_plan';
use Test::Class::Load 't/lib';
根据
Test::Class::Load
doc 中的建议,我的每个测试类都有一个基类要继承,SG::TestBase
住在 t/lib/SG/TestBase.pm
:package SG::TestBase;
use strict;
use warnings;
use base 'Test::Class';
INIT { Test::Class->runtests }
1;
最后,这是一个示例测试类,
SG::UtilsTest
在 t/lib/SG/UtilsTest.pm
:package SG::UtilsTest;
use strict;
use warnings;
use base 'SG::TestBase';
BEGIN { use_ok('SG::Utils') };
<etc>
如果我想用
Build test
运行所有测试,一切都还不错或 prove
,但尝试运行单个测试不起作用:drewfus:~/sandbox$ prove -lv SG::UtilsTest
Cannot determine source for SG::UtilsTest at /usr/share/perl/5.10/App/Prove.pm line 496
最佳答案
恭喜您发现文档中的错误:-)
最后一个参数应该是测试类的路径 - 而不是包名。您还需要添加测试类库的路径,以便证明可以找到它们
prove -lv -It/lib t/lib/SG/UtilsTest.pm
应该管用。
关于perl - 如何使用 Test::Class::Load 运行单独的测试?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1515113/