#run script.pl as child process
my $pid;
my $script = '/myroot/public_html/cgi-bin/script.pl';	

if ($pid = fork)
{ 
  #do something
}
elsif (defined $pid)
{ 
  close STDOUT;
  system $script;
}
else
{ 
  die "Major error: $!"; 
}