我正在将一个程序的输出传输到我编写的某些 Perl 中。这是一个长期运行的过程，有时需要几天，所以我想找出我的瓶颈在哪里并尝试打开它们。我想知道数据是否以比我的脚本处理它的速度更快的速度传送到我的脚本中。如果是这种情况，我会尝试调整我的脚本，但如果我不需要，则不会。我看到谈论在缓冲区已满时设置标志以防止对其进行更多写入，但我如何检查该标志是否或多久设置一次？有任何想法吗？
pipe
pipe ×1