while($select->can_read(10)){
   my $msg_in;
   #Textempfang
   $socket->recv($msg_in, $MAXLENGTH);
   unpackReceived($msg_in);
  }