[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[转载教程] Perl脚本获取Shell命令的执行结果

Perl里可以调用Shell命令,有时需要根据shell命令的返回结果做进一步的工作,如何获得shell的执行结果?
方法有很多:
1. 重定向shell的标准输出或标准错误输出到某临时文件,然后再从临时文件中读出执行结果。
这个办法的好处是可以把标准输出和标准错误输出分开保存!

2.
  1. my $res = `ls`;
复制代码
这种方法很直接,也很想shell

3.
  1. open( my $fh, "ls |") or die "$!";
  2. while ( <$fh> ) {
  3. print;
  4. }
复制代码
把管道用起来,比较新颖。

返回列表