version 1.21, 2006/05/10 02:21:19
|
version 1.22, 2006/12/19 17:44:16
|
Line 253 sub make_new_child {
|
Line 253 sub make_new_child {
|
for (my $i=0; $i < $MAX_CLIENTS_PER_CHILD; $i++) { |
for (my $i=0; $i < $MAX_CLIENTS_PER_CHILD; $i++) { |
&status('Accepting connections'); |
&status('Accepting connections'); |
my $client = $server->accept() or last; |
my $client = $server->accept() or last; |
print $command "kill(all);reset();\n"; |
print $command "kill(all);\n"; |
&getmaximaoutput($command); |
&getmaximaoutput($command); |
&sync($command); |
&sync($command); |
while (my $cmd=<$client>) { |
while (my $cmd=<$client>) { |