Select Code to Download

while (recv ($local_client,$e,1,0)) { print $e; };

while (recv ($local_client,$e,1,0)) { print $e; last unless connected(
+$local_client) };