Perl函数中Perl进程控制函数用法解析.pdf

Perl 函数中Perl进程控制函数用法解析 本文和大家重点讨论一下Perl进程处理函数的用法，主要包括进程 启动函数，进程终止函数和进程控制函数等内容，相信通过本文的学习你 对Perl进程处理函数的用法一定会有深刻的认识。 1、进程启动函数 Perl 函数名 eval 调用语法eval(string) 解说将string看作Perl 函数名语句执行。 正确执行后，系统变量$@为空串，如果有错误，$@中为错误信息。 例子$print=print(\hello,world\\n\);; eval($print); 结果输出hello,world Perl 函数名 system 调用语法system(list) 解说list 中第一个元素为程序名，其余为参数。 system 启动一个进程运行程序并等待其结束，程序结束后错误代码左 移八位成为返回值。 例子@proglist=(echo,hello,world!); system(@proglist); 结果输出hello,world! Perl 函数名 fork 调用语法procid=fork(); 解说创建程序的两个拷贝--父进程和子进程--同时运行。子进程返回 零，父进程返回非零 值，此值为子程序的进程ID号。 例子 1. $retval=fork(); 2. if($retval==0){ 3. #thisisthechildprocess 4. exit;#thisterminatesthechildprocess 5. }else{ 6. #thisistheparentprocess 7. } 8. 结果输出无 Perl 函数名 pipe 调用语法pipe(infile,outfile); 解说与fork合用，给父进程和子进程提供通信的方式。送到outfile 文件变量的信息可以 通过infile 文件变量读取。步骤： 1、调用pipe 2、用fork将程序分成父进程和子进程 3、一个进程关掉infile，另一个关掉outfile 例子 1. pipe(INPUT,OUTPUT); 2. $retval=fork(); 3. if($retval!=0){ 4. #thisistheparentprocess 5. close(INPUT); 6. 7. print(Enteralineofinput:\n); 8. $line=STDIN; 9. printOUTPUT($line); 10. }else{ 11. #thisisthechildprocess 12. close(OUTPUT); 13. $line=INPUT; 14. print($line); 15. exit(0); 16. } 17. 结果输出$ program Enteralineofinput: Hereisatestline Hereisatestline $ Perl 函数名 exec 调用语法exec(list); 解说与system类似，区别是启动新进程前结束当前程序。常与fork 合用，当fork分成两个 进程后，子进程用exec 启动另一个程序。 例子 结果输出 Perl 函数名 syscall 调用语法syscall(list); 解说调用系统Perl 函数名，list 第一个元素是系统调用名，其余为 参数。 如果参数是数字，就转化成C 的整型数(typeint)。否则传递字符串 的指针。详见UNIX 的帮助Perl 函数名文档。 使用syscall 必须包含文件syscall.pl，即： require(syscall.ph); 例子 结果输出 2、进程终止函数 Perl 函数名 die 调用语法die(message);