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