perl - 如何控制 Perl 中缓冲区刷新的时间

Question

Perl 中如何对缓冲施加更多控制？我知道我可以使用 autoflush立即刷新缓冲区，或者我什么也不做，让 Perl 在感觉时刷新。

但是我可以更改缓冲区大小吗？或者我可以每隔 30 秒强制刷新一次吗？

我想知道如何为文件句柄或 STDOUT 执行此操作。我试过通过 IO::Handle文档，但一直无法弄清楚我需要什么。

Answer 1

But can I change the buffer size?

在 5.14 之前，每个文件句柄的缓冲区大小为 4096 字节。

从 5.14 开始，可以在构建 Perl 时选择每个文件句柄缓冲区的大小(通过将 -Accflags=-DPERLIOBUF_DEFAULT_BUFSIZ=num_bytes 传递给 Configure)。默认值为 8192 字节。

Or can I force a flush every, say, 30 seconds?

您可以随时强制同花。

use IO::Handle qw( );   # Not needed in 5.14+
$fh->flush();
STDOUT->flush();