Select Code to Download

    my $server = "theSite.com";
    my $proto = getprotobyname("tcp") || 6;
...
    close SK_CLIENT || die("Close error: $!");

    print "$thePage\n";