my $client = new IO::Socket::SSL(PeerAddr => "servername", PeerPort => "https", SSL_reuse_ctx => $context);