Net::SSLeay::free($ssl);
Net::SSLeay::CTX_free($ctx);
$socket->close();