Select Code to Download

###########
use strict;
...
close($client);
$sock->shutdown(2);
close($sock);

###########
use strict;
...
}
print "done\n";
close($sock);