【发布时间】:2011-08-12 01:22:43
【问题描述】:
给定一个第三方程序,如何同时提供一个:
- 将标准输出写入 z.stdout
- 将标准错误写入 z.stderr
- 适当地传递退出代码
- 以正确的交错顺序将两者写入标准输出
这是我一直在使用的测试程序(delayed_interleaved_stdout_stderr.pl):
#!/usr/bin/env perl
use strict;
use warnings;
# fixme: debug, uncomment to force stdout flushing
# use English '-no_match_vars';
# $OUTPUT_AUTOFLUSH = 1;
# use sleeps to simulate delays and test buffering
use Time::HiRes 'sleep';
foreach my $num ( 0..9 ) {
if ( 0 == $num % 2 ) {
print STDOUT $num, ":stdout\n";
}
else {
print STDERR $num, ":stderr\n";
}
sleep 0.25;
}
到目前为止,我已经能够完成 1,2,3 了:
( set -o pipefail; \
( set -o pipefail; delayed_interleaved_stdout_stderr.pl \
| tee z.stdout; exit $? \
) 3>&1 1>&2 2>&3 | tee z.stderr; exit $? \
) 3>&1 1>&2 2>&3
感谢lhunath 的related answer 和一位朋友,我将其简化为:
delayed_interleaved_stdout_stderr.pl > >(tee z.stdout) 2> >(tee z.stderr >&2)
但是,我无法获得正确的交错顺序。 stderr 立即打印,(可能是缓冲的)stdout 所有打印在最后。
1:stderr
3:stderr
5:stderr
7:stderr
9:stderr
0:stdout
2:stdout
4:stdout
6:stdout
8:stdout
运行延迟_interleaved_stdout_stderr.pl 本身以正确的 0-9 顺序显示。强制标准输出刷新正常工作(请参阅注释的 fixme 部分),但我将无法修改真实文件。
也许我错过了一些基本的东西,我开始怀疑这是否可能:(
【问题讨论】:
-
bash sn-ps 很好——在我看来问题在于 perl 的输出缓冲。如果您能想出一种方法在不修改脚本的情况下取消缓冲输出,那么顺序应该是正确的。我尝试使用 GNU
stdbuf实用程序,但它没有做任何事情。 -
似乎不太可能有帮助,但请查看您的系统是否有
unbuffercmd。这值得一试。不可修改的代码是perl吗?祝你好运。 -
至少有一部分是 Perl;我将与作者合作,尽可能强制刷新标准输出。感谢您的建议!
-
顺便说一句,如果我要使用:“delayed_interleaved_stdout_stderr.pl > >(tee z.stdout) 2> >(tee z.stderr >&2)”并尝试强制 stdout冲洗,我应该更新我的问题并回答我自己的问题,还是不回答这个问题更好?
标签: bash redirect stdout stderr tee