作者qrtt1 (愚人)
看板perl
标题Re: [问题] 如何抓stdout
时间Mon Dec 18 17:26:05 2006
※ 引述《erspicu (lpo)》之铭言:
: : 问题是这样不一定管用...很多程式会列印出的东西(部分部分的),
: : 不是直接给你列印在萤幕,就是莫名其妙既没有印在萤幕上,
: : stdout也抓不到.
: : 像我现在要抓mencoder的编码资讯,就抓不到,我用 > 直接把资讯导到out.txt上,
: 导出的文件档
: http://abraxas.no-ip.org/~abraxas/file/stdout.gif
: 用笔记本开启的画面
: http://abraxas.no-ip.org/~abraxas/file/res.txt
: 一直没办法抓到输出进度百分比的资料(除了最後一行的输出外)
: (不是不会用比对抓取输出的某个部分,而是那一整行没办法抓到)
: 有人可以给个想法吗?
http://www.unix.org.ua/orelly/perl/prog3/ch16_03.htm
open STATUS, "netstat -an 2>/dev/null |"
or die "can't fork: $!";
while (<STATUS>) {
next if /^(tcp|udp)/;
print;
}
close STATUS or die "bad netstat: $! $?";
参考看看
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.26.34.247
1F:推 erspicu:对我的问题无效 12/18 18:40