perl - 如果在没有换行符的情况下写入标准输出，则测试失败

Question

当我使用 prove 实用程序运行 perl 测试时，如果被测方法包含未由换行符终止的 print 语句，则测试失败。

use Test::More tests=>1;

ok(foo(), "calling foo");

sub foo{
    print "A";
    1;
}

这导致

Bad plan.  You planned 1 tests but ran 0.

如果我附加一个换行符:print "A\n"; 测试通过。

(请注意，如果我只是执行测试 perl mytest.t 而不是使用 prove ，它会通过任何一种方式)。

任何想法为什么会这样，以及如何解决它？

Answer 1

我找到了一个快速解决方法:

$|=0;     # no auto-flush

...但我(还)不知道为什么会这样。