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