小编Mic*_*jay的帖子

我第一次尝试使用fork,所以我可以重定向用户的Web浏览器,然后继续处理.我查找了使用fork的代码,但我的子进程没有执行(即文件没有被创建).我究竟做错了什么？

#! /usr/bin/perl 

if ($pid = fork) { } 
else { 
  close STDOUT(); 
  open(FILE,'>test.txt'); 
   print FILE time; 
  close(FILE); 
  exit(0); 
} 
print "Location: http://mydomain.com/\n\n";