while(1)
{
while (my $connection = $main->accept) {
threads->create(\&initplayer,$connection);
 
}