test-more

    1热度

    1回答

    我对随机生成的数据进行了大量检查。我怎样才能得到报告消息只为失败的测试,如果检查是好的,什么也不显示?

    2热度

    1回答

    语境: 说我有相互继承几个模块(使用老派的继承与base和parent,不驼鹿或类似)。 Foo::Bar继承Foo和Foo::Bar::Baz继承Foo::Bar。所有这些模块都有用Test::More编写的测试套件。子类的测试套件只测试它实现的方法。子类不一定会覆盖其父母中的所有方法,尽管他们可能会添加父母不具备的新方法。 问: 有一些测试框架,技术或Test::More功能与我可以写测试,不

    0热度

    1回答

    我目前正致力于在Project Euler拼图中实现构建库。我已经到了构建测试的阶段,但是在某个时候我的测试失败了。一切都可以导入,但是一旦我测试了一个子程序的存在,我新创建的测试就失败了。我最初启动了Test :: More,但是为了简化我切换到Test :: Simple的事情。每次运行后,即使简化为不太复杂的测试功能,我也会得到相同的错误输出。我的代码中是否存在一些我忽略的错误,或者我的系统

    0热度

    1回答

    这是一个比我的理解更重要的问题。我使用Test::More通过TAP::Harness运行一些测试。 当测试运行时,它会返回一个退出代码和一个等待代码。 退出代码被设计为在失败时返回非零值,按照Test::Moredocumentation。 但是等待代码意味着什么?它似乎是我正在运行的测试失败测试次数(256 * n)的倍数。 我的猜测是该协议试图模拟Unix与父子过程的关系,但我对等待代码一无

    2热度

    1回答

    在Perl单元测试和代码覆盖(其中很有帮助)这个Post中使用目录和文件体系结构,我将单元测试和代码覆盖的文件复制到一个新的“lib”目录中,奇迹般有效! 但是,我需要的模块,在现有的“脚本”目录看.. 我已经通过模块::上CPAN构建文档梳理,但我仍然得到找不到文件LIB /processBuildSubs.pm错误 这里是我迄今... use strict; use Module::Buil

    1热度

    1回答

    我有我写的测试脚本 工作科罗计划这是我怎么想测试一个削减版本 use Test::More ;#tests => 9; BEGIN{ use_ok('EV') || print "Bail out!\n"; use_ok('Coro') || print "Bail out!\n"; use_ok('AnyEvent') || print "Bail out!\n

    0热度

    1回答

    我正在以下回溯当我尝试prove factorial: Cannot detect source of 'factorial'! at /usr/share/perl/5.18/TAP/Parser/IteratorFactory.pm line 263. TAP::Parser::IteratorFactory::detect_source('TAP::Parser::Iterator

    1热度

    1回答

    我正在滚动Test :: More的代码,因为我想看看如何实现use_ok和require_ok(以及为什么Ovid不喜欢它们)。我来到_eval子程序,它包含一些特殊的逻辑,在调用eval期间,我并不完全了解这些逻辑用于保护变量。我从Try::Tiny的文档中了解到处理[email protected]有多困难。不过,我不明白的$!和$SIG{__DIE__}处理(下面的框原始拷贝): # Wo

    2热度

    1回答

    我已经通过documentation并找不到我的查询的确定答案。 在我的很多测试中,执行一个SKIP块的条件是先前的测试成功。 因此,举例来说,这是我写的: ok(@results > $threshold , 'Threshold met'); SKIP: { skip 'due to insufficient results', 3 unless @results

    2热度

    1回答

    我能够编写单元测试test_case.t为Perl模块ModuleOne.pm test_case.t use strict; use warnings; use Test::More; use Test::Cmd; use ModuleOne; # Included the module here my $ret = ModuleOne::methodone(args); is($