Perl fork用法及代码示例

描述

该函数使用 fork() 系统调用创建一个新进程。任何共享套接字或文件句柄都在进程间复制。您必须确保等待您的孩子以防止 "zombie" 进程形成。

用法

以下是此函数的简单语法 âˆ'

fork

返回值

此函数在 fork 失败时返回 undef，成功时将子进程 ID 返回到父进程 0 到子进程成功。

示例

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl

$pid = fork();
if( $pid == 0 ) {
   print "This is child process\n";
   print "Child process is existing\n";
   exit 0;
}
print "This is parent process and child ID is $pid\n";
print "Parent process is existing\n";
exit 0;

当上面的代码被执行时，它会产生下面的结果——

This is parent process and child ID is 18641
Parent process is existing
This is child process
Child process is existing