请选择 进入手机版 | 继续访问电脑版
 找回密码
 立即注册
查看: 46|回复: 0

perl脚本执行linux命令行

[复制链接]

2万

主题

2万

帖子

7万

积分

网站编辑

Rank: 8Rank: 8

积分
71424
发表于 2022-8-10 04:51:57 | 显示全部楼层 |阅读模式

一、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

更多信息请查看IT技术专栏

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则


快速回复 返回顶部 返回列表