perl执行系统命令

概述在Perl中，可以用system、exec、readpipe这三个命令来调用其他脚本、系统命令等。这三个命令的主要区别就是返回值。 1) 对于system这个函数来说，它会返回执行后的状态，比如说     my @args = (“command”, “arg1″, “arg2″);     system(@args) == 0     or die “system @args failed: $

在Perl中，可以用system、exec、readpipe这三个命令来调用其他脚本、系统命令等。这三个命令的主要区别就是返回值。

1) 对于system这个函数来说，它会返回执行后的状态，比如说

    my @args = (“command”,“arg1″,“arg2″);
    system(@args) == 0
    or dIE “system @args Failed: $?”

可以查错。

2) 而对于exec这个函数来说，仅仅是执行一个系统的命令，一般情况下并没有返回值。exec只有在系统没有你要执行的命令的情况下，才会返回false值。

exec (‘foo’)   or print STDERR “Couldn’t exec foo: $!”;
    { exec (‘foo’) }; print STDERR “Couldn’t exec foo: $!”;

3) 当我们需要保存系统命令运行的结果，以便分析并作进一步的处理时，就要用到readpipe这个函数了。例如：

    @result = readpipe( “ls -l /tmp” );
    print “@result”;

会产生如下的结果：

    drwxr-xr-x  2 root   root    4096 Mar 19 11:55 testdir

当然，你也可以把生成的结果放到一个文件里，以便写工作日志呀、发布报告呀。

总结

以上是内存溢出为你收集整理的perl执行系统命令全部内容，希望文章能够帮你解决perl执行系统命令所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。