Select Code to Download

for ($count=0;$count<5;$count++){
        unless (defined ($pid[$count] = fork)) {
...
                exit;             #child stops ehre
        }
}                                 # Parent continues here

print "Content-Type:text/html\n\n";
print $q->pre("Will be tracing to $trace<BR>\n");
print ("your coming from $ENV{REMOTE_ADDR}<BR>\n");

1
1
...
2
3
4