Select Code to Download

use MY::Variables;
use Socket;
...
        print "hi";
        $count++;
    }

use MY::Variables;
use Socket;
...
            print "I couldn't connect $!";
        }
        close(SERVER);