首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > perl python >

请问一个perl抓可执行程序print到屏幕的信息的有关问题

2012-02-24 
请教一个perl抓可执行程序print到屏幕的信息的问题用perl运行一个可执行程序system(aaa.exe,test.in,

请教一个perl抓可执行程序print到屏幕的信息的问题
用perl运行一个可执行程序
system("aaa.exe","test.in","test.out");
运行程序aaa test.in 和test.out是两个参数 
我现在想用perl来抓aaa程序运行后打印到屏幕上的信息,请问怎么抓,试了好几个都有问题。

my $fun = sub{return system("aaa.exe","test.in","test.out");};
&{$fun};
open (OPP,'<',$fun)
while(<OPP>){
  pring "$_\n";
}
#总是报句柄已经关闭 也就是说 没有成功打开$fun。 请问哪里错了!
或者有其他方法可以获取到吗?谢谢了

[解决办法]
$fun是一个函数。为啥你觉得可以打开这个函数?
[解决办法]
路过,帮顶。
[解决办法]
使用文件重定向。
system("aaa.exe test.in test.out >OUT");
然后打开OUT文件,去读里边的内容,应该是你想要的。
[解决办法]
攒一个。

热点排行