Select Code to Download

# create default context
my $ctx = Net::SSLeay::CTX_new or die;
...
        Net::SSLeay::set_SSL_CTX($ssl, $hostnames{$h}->{ctx});
    }
);