Perl fork 函数

描述

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


语法

以下是此函数的简单语法 −

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

❮ Perl 函数参考