sub input { &rm_away($alias,$room); $maxVerlauf = "10" if ($maxVerlauf eq undef); $verlaufOrder = "1" if ($verlaufOrder eq undef); if ($tmp eq "login") { &post($room,"".×tring." $alias hat den Chat im Raum $room betreten ..."); } print < END &style; print <
END $client->$shutdown(2); exit 0; } 1;