print `someshellscript.sh`;
打印一堆东西需要很长时间才能完成,如何在执行shell脚本的过程中打印输出？
看起来Perl只会在完成后打印someshellscript.sh结果,有没有办法在执行过程中进行输出刷新？
open(F,"someshellscript.sh|"); while (<F>) { print; } close(F);
这会运行someshellscript.sh并打开一个读取其输出的管道. while循环读取脚本生成的每行输出并打印出来.有关更多信息,请参见open文档页面.
