华域联盟 perl Perl调用shell命令方法小结

Perl调用shell命令方法小结

一、system
perl也可以用system调用shell的命令,它和awk的system一样,返回值也是它调用的命令的退出状态.

复制代码 代码如下:

[root@AX3sp2 ~]# cat aa.pl

#! /usr/bin/perl -w

$file = "wt.pl";

system("ls -l wt.pl");

$result = system "ls -l $file";

print "$result \n"; #输出命令的退出状态

system "date";

[root@AX3sp2 ~]# perl aa.pl
-rwxr-xr-x 1 root root 126 12-16 15:12 wt.pl
-rwxr-xr-x 1 root root 126 12-16 15:12 wt.pl
0
2010年 12月 16日 星期四 15:58:34 CST     


二、反引号
perl的system函数和awk的一样不能够返回命令的输出.

要得到命令的输出,就得使用和shell本身一样的命令:     ` `


复制代码 代码如下:

[root@AX3sp2 ~]# cat bb.pl

#! /usr/bin/perl

print `date`;

print "this is test \n";

[root@AX3sp2 ~]# perl bb.pl
2010年 12月 16日 星期四 15:51:59 CST
this is test


三、exec
最后,perl还可以使用exec来调用shell的命令. exec和system差不多,不同之处在于,调用exec之后,perl马上就退出,而不会去继续执行剩下的代码


复制代码 代码如下:

[root@AX3sp2 ~]# cat cc.pl

#! /usr/bin/perl

exec ("echo this is test");

print "good bye !\n";  #这句话不会被输出

[root@AX3sp2 ~]# perl cc.pl
this is test

您可能感兴趣的文章:

本文由 华域联盟 原创撰写:华域联盟 » Perl调用shell命令方法小结

转载请保留出处和原文链接:https://www.cnhackhy.com/77260.htm

本文来自网络,不代表华域联盟立场,转载请注明出处。

作者: sterben

发表回复

联系我们

联系我们

2551209778

在线咨询: QQ交谈

邮箱: [email protected]

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

关注微博
返回顶部