perl - 当受测者在 Perl 中使用 TAP 失败退出时，是否可以测试预期错误？

Question

假设您正在运行一些单元测试，并且您想要查看您正在测试的方法(或脚本或函数或其他)是否按预期失败。你如何设置这样的测试？我希望是这样的:

ok( $obj->method($my, $bad, $params) == DEATH, 'method dies as expected');

虽然我不明白它是如何工作的，因为 method dies 当传递错误的参数并且测试脚本停止时。

还有别的办法吗？

Answer 1

你试过了吗Test::Exception ？ dies_ok 应该做你想做的事。例如:

# Check that something died - we do not care why
dies_ok { $foo->method } 'expecting to die';