关于perl fork

fork会产生子进程，fork的返回值是0那么就是子进程，非0为父进程。

wait是强制父进程等待子进程执行完毕，并把子进程的pid返还给父进程，如果子进程不存在wait就返回-1

当调用fork函数的时候将会有两个进程在运行一个是子进程还有一个是父进程。

#!/usr/bin/perl
$childrun=fork();
if ( $childrun == 0 ){
        print "child process! pid=$childrun\n";
}elsif( defined $childrun ){
        print "parenit process! pid=$childrun";
}