全面認識Perl進程處理函數
本文和大家重點學習一下Perl進程處理函數的概念，這里主要包括Perl進程啟動函數和Perl進程終止函數兩部分內容，希望本文的介紹能讓你有所收獲。
Perl進程處理函數
1、Perl進程處理函數中Perl進程啟動函數
函數名eval
調用語法eval(string)
解說將string看作Perl語句執行。
正確執行后，系統變量$@為空串，如果有錯誤，$@中為錯誤信息。
例子$print="print(\"hello,world\\n\");";
eval($print);
結果輸出hello,world
函數名system
調用語法system(list)
解說list中***個元素為程序名，其余為參數。
system啟動一個進程運行程序并等待其結束，程序結束后錯誤代碼左移八位成為返回值。
例子@proglist=("echo","hello,world!");
system(@proglist);
結果輸出hello,world!
函數名fork
調用語法procid=fork();
解說創建程序的兩個拷貝--父進程和子進程--同時運行。子進程返回零，父進程返回非零
值，此值為子程序的進程ID號。
例子
- $retval=fork();
- if($retval==0){
- #thisisthechildprocess
- exit;#thisterminatesthechildprocess
- }else{
- #thisistheparentprocess
- }
結果輸出無
函數名pipe
調用語法pipe(infile,outfile);
解說與fork合用，給父進程和子進程提供通信的方式。送到outfile文件變量的信息可以
通過infile文件變量讀取。步驟：
1、調用pipe
2、用fork將程序分成父進程和子進程
3、一個進程關掉infile，另一個關掉outfile
例子
- pipe(INPUT,OUTPUT);
- $retval=fork();
- if($retval!=0){
- #thisistheparentprocess
- close(INPUT);
- print("Enteralineofinput:\n");
- $line=<STDIN>;
- printOUTPUT($line);
- }else{
- #thisisthechildprocess
- close(OUTPUT);
- $line=<INPUT>;
- print($line);
- exit(0);
- }
結果輸出$
- program
- Enteralineofinput:
- Hereisatestline
- Hereisatestline
- $
函數名exec
調用語法exec(list);
解說與system類似，區別是啟動新進程前結束當前程序。常與fork合用，當fork分成兩個
進程后，子進程用exec啟動另一個程序。
例子
結果輸出
函數名syscall
調用語法syscall(list);
解說調用系統函數，list***個元素是系統調用名，其余為參數。
如果參數是數字，就轉化成C的整型數(typeint)。否則傳遞字符串的指針。詳見UNIX的幫助Perl文檔。
使用syscall必須包含文件syscall.pl，即：
require("syscall.ph");
例子
結果輸出
2、Perl進程處理函數中Perl進程終止函數
函數名die
調用語法die(message);
解說終止程序并向STDERR輸出錯誤信息。message可以為字符串或列表。如果***一個參
數不包含換行符，則程序文件名和行號也被輸出。
例子die("Cannotopeninputfile");
結果輸出Cannotopeninputfileatmyprogline6.
函數名warn
調用語法warn(message);
解說與die類似，區別是不終止程序。
例子warn("Danger!Danger!\n");
結果輸出Danger!Danger!
函數名exit
調用語法exit(retcode);
解說終止程序并指定返回值。
例子exit(2);
結果輸出無
函數名kill
調用語法kill(signal,proclist);
解說給一組進程發送信號。
signal是發送的數字信號，9為殺掉進程。
proclist是進程ID列表。詳見kill的UNIX幫助。
例子
結果輸出
【編輯推薦】
