1 system
perl也可以用system調(diào)用shell的命令,它和awk的system一樣,返回值也是它調(diào)用的命令的退出狀態(tài).如果向system傳遞一個(gè)字符串作參數(shù),則perl會(huì)調(diào)用shell來(lái)執(zhí)行這個(gè)命令,在這個(gè)字符串內(nèi)也就不可以有perl 的變量了;如果傳遞多個(gè)字符串作參數(shù),則perl會(huì)自己執(zhí)行這個(gè)命令,且可以傳遞perl自己的變量給它,因?yàn)閜erl會(huì)對(duì)這些變量擴(kuò)展成它們的值

$ perl system("ls -l grep.test"); $long = "-l"; $file = "grep.test"; system "ls", $long, $file; system("ls $long $file"); -rw-r--r-- 1 Administrator None 25 Feb 27 21:37 grep.test -rw-r--r-- 1 Administrator None 25 Feb 27 21:37 grep.test -rw-r--r-- 1 Administrator None 25 Feb 27 21:37 grep.test

注意上面只輸出了三次grep.test的信息,且最后一行是空行,可見(jiàn)最后一個(gè)system調(diào)用的ls有錯(cuò)誤,因?yàn)橹粋鬟f一個(gè)字符串給system,perl是不會(huì)把這個(gè)字符串里出現(xiàn)的變量進(jìn)行擴(kuò)展的.
2 反引號(hào)
perl的system函數(shù)和awk的一樣不能夠返回命令的輸出.要得到命令的輸出,就得使用和shell本身一樣的命令:` ` (一對(duì)反引號(hào),鍵盤上Esc鍵下面的那個(gè))

$ perl $now = `date`; print $now; Sun Mar 8 23:08:24 2009

3 exec
最后,perl還可以使用exec來(lái)調(diào)用shell的命令. exec和system差不多,不同之處在于,調(diào)用exec之后,perl馬上就退出,而不會(huì)去繼續(xù)執(zhí)行剩下的代碼
$ perl
exec("date");
print "this line will never be seen.";
Sun Mar 8 23:16:54 2009

總結(jié)

以上是生活随笔為你收集整理的perl调用shell的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。