中文字幕免费精品_亚洲视频自拍_亚洲综合国产激情另类一区_色综合咪咪久久

一、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技術專欄