我正在使用Test :: More模块.如果我有一个.t文件,一堆测试(主要使用ok());第一次失败后,如何让测试工具停止.我现在看到的是如果第一个OK失败;后续的ok()情况仍在运行.
我看着使用TEST :: More :: Bail_OUT;但是这将停止所有测试停止(意味着我拥有的其他.t文件),而不仅仅是测试停止特定的文件.
谢谢!
解决方法
调用done_testing()并退出.
- ok( first_test(),'first test' ) or done_testing,exit;
- ok( second_test(),'second test' );
- ...
- SKIP: {
- ok( first_test ) or skip "useless to run the next 4 tests",4;
- ok( second_test );
- ok( third_test );
- ok( fourth_test );
- ok( fifth_test );
- }
- ok( sixth_test );
- done_testing();
skip / SKIP的主要优点是它在旧版本的Test :: More中得到支持.