Select Code to Download

syswrite($socket, "$prep rcon $rcon_passwd status\r");

while ( (sysread($socket, $incoming, 1024) != 0) {
 print $incoming;
}