next if ($NoClient < 2) #### print $socket .. if ($1 ne $ID ..);