Board logo

标题: [转载教程] Perl脚本获取Shell命令的执行结果 [打印本页]
作者: find    时间: 2012-1-10 14:25     标题: 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. }
复制代码
把管道用起来，比较新颖。



欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2