#close filehandle before detached thread dies out
print "closing lclient $lclient\n";
    close( $lclient);
    #remove multi-echo-clients from echo list
    @clients = grep {$_ !~ $lfileno} @clients;
print "exiting thread .....clients = @clients\n";