if($socket == $server) {
            my $client = $socket->accept();
            print "Connected\n";
            $select->add($client);
            $client->print("Hallo Client\n");