Hello,
I have a perl script which is working as TCP socket server.
In this I am redirecting STDOUT to file.
with command in the begining of the script:
open STDOUT, '>./tRL.out' or die "./tRL.out: $!";
I have following four "print STDOUT" commands
while (accept(CLIENT,SERVER)) {
>> Hint: disable perl's print buffering with $|=1; before you fork().
I did this and it worked,
Thanks,
Appreciated very much,
-Pratibha
"Johannes Franken" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> * news reader
Hi,
I have a script working as TCP socket server.
It is forking child processes. These child processes are using system
commands also.
As some point of time, I need to kill all the processes running under main
processes.
and I am using following piece of code for that Which means to Hang up all