perl - 为 Mojolicious 测试提供描述性测试名称？

Question

我正在整理我的 Mojolicious 测试并给它们适当的描述性名称。例如:

$t->get_ok( '/api/ninjablock', 'Run a GET against /api/ninjablock with no credentials' )
     ->status_is( 403, '  and it has correctly returned a 403' );

然而，测试输出看起来像这样:

ok 1 - GET /api/ninjablock
ok 2 -   and it has correctly returned a 403

我假设我遗漏了一些明显的东西，但我如何让第一个测试显示除 GET/api/ninjablock 作为名称之外的东西？

Answer 1

根据Test::Mojo source code , get_ok()只接受三个参数，($self, $method, $url)。因此，对于 Test::Mojo 本身，您无法按照当前的方式为测试分配描述。

遗憾的是您无法提供描述，但您可以将任何您喜欢的测试包装在 Test::More 的 ok() 中，is() 等子程序。

不要害怕将它提升到更高的水平。如果您需要测试多个 URL 在您不提供凭据时返回 403:

ok($t->get_ok($_)->status_is(403) => "$_ no creds : 403") for @urls;

请注意，这将导致额外的测试输出行(或额外的测试编号)，但大多数时候无论如何您都应该使用线束运行，因此只会显示失败的测试。如果您需要一些额外的组织，您可以考虑 Test::Group。