在Perl中使用shell命令和管道

在Perl中使用shell命令有三種方法

• system函數
• 反引號``
• qx{}

第一種方法，system函數格式如下

system("command");

若命令正常運行則返回0，否則返回非零值

此方法的缺點是不能將shell命令的輸出直接捕獲到Perl程式中來

第二種方法，使用反引號``，可直接將shell命令的輸出捕獲到Perl程式中（即其傳回值）

對於多行輸出，將其賦給陣列變數，如

@a = `ls -al`;

第三種方法，使用qx{}，該方法適用於command包含多個反引號的情況。另外，花括弧{}也可換為別的符號

Perl中的管道被視為即可讀取也可寫入的檔案，如

open(RHANDLE, "ls -al | sort | ");//RHANDLE是讀檔案控制代碼，讀入sort命令輸出的部分open(WHANDLE, " | more");//WHANDLE是寫檔案控制代碼，寫入的內容通過管道傳給more命令進行分頁顯示