Select Code to Download

#!/usr/bin/env perl

...
# and terminate the connection when we're done
close($socket);

#!/usr/bin/env perl

...
# close socket so it can reused
close($socket);