Select Code to Download

    shutdown ($sock[$count2], 2);
    print "Closed $sock[$count2]\n";

    print "Closed $sock[$count2]\n";
    $sock[$count2] = undef;