在积累了足够的测试后,运行它们都需要一些实时的时间,我查看了
Test::Class::Load
doc以找到运行单个测试类的提示.它提供了一种方法来做到这一点,但我必须遗漏一些东西,因为我无法使它工作.这就是我所拥有的:
我的测试目录:
drewfus:~/sandBox$ls t/ lib/ perlcriticrc PerlCritic.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中的建议,我有一个基类来继承我的每个测试类,生成在t / lib / SG / TestBase.pm的SG :: TestBase:
package SG::TestBase; use strict; use warnings; use base 'Test::Class'; INIT { Test::Class->runtests } 1;
最后,这是一个示例测试类,在t / lib / SG / UtilsTest.pm的SG :: UtilsTest:
package SG::UtilsTest; use strict; use warnings; use base 'SG::TestBase'; BEGIN { use_ok('SG::Utils') }; <etc>
如果我想用Build测试或证明来运行所有测试,那么一切仍然很好,但尝试运行单独的测试不起作用:
drewfus:~/sandBox$ prove -lv SG::UtilsTest Cannot determine source for SG::UtilsTest at /usr/share/perl/5.10/App/Prove.pm line 496