Kiểm tra thất bại dưới chứng minh nếu nó viết để stdout mà không có newline

Question

Khi tôi chạy thử nghiệm perl bằng cách sử dụng tiện ích prove, nó không thành công nếu phương pháp thử nghiệm chứa print câu lệnh không được kết thúc bằng dòng mới.

use Test::More tests=>1; 

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

sub foo{ 
    print "A"; 
    1; 
} 

Điều này dẫn đến

Bad plan. You planned 1 tests but ran 0. 

Nếu tôi thêm một dòng mới: print "A\n"; kiểm tra đi.

(Lưu ý rằng nếu tôi chỉ thực hiện thử nghiệm perl mytest.t thay vì sử dụng prove thì nó sẽ được chuyển theo một trong hai cách).

Bất kỳ ý tưởng nào về lý do này có thể và cách khắc phục?

Answer 1

Tôi tìm thấy một workaround nhanh:

$|=0;  # no auto-flush 

... nhưng tôi không có ý tưởng (chưa) lý do tại sao các công trình này.