anchor.diff:      {Host, Port, ssl_opts(connect)};
   client_init(Master, ssl, payload, Host, Port) ->
       {ok, Sock} = ssl:connect(Host, Port, ssl_opts(connect)),
  +    Master ! {self(), init},
  +    Size = byte_size(msg()),
  +    {Sock, Size};
  +client_init(Master, ssl, pem_cache, Host, Port) ->
  +    {ok, Sock} = ssl:connect(Host, Port, ssl_opts(connect_der)),
       Master ! {self(), init},
       Size = byte_size(msg()),
       {Sock, Size};
  
positive.code: 		   ssl:close(TSocket)
  	   end,
      setup_server_connection(Socket, Test);
  
  server_init(Type, Tc, _, _, Server) ->
      io:format("No server init code for ~p ~p~n",[Type, Tc]),
  
negative.code: 			   data=[{value, Result},
  				 {suite, "ssl"}, {name, "Payload simple"}]}),
      ok.
  
  use_pem_cache(_Config) ->
      {ok, Result} = do_test(ssl, pem_cache, 100, 500, node()),
      ct_event:notify(#event{name = benchmark_data,
                             data=[{value, Result},
                                   {suite, "ssl"}, {name, "Use PEM cache"}]}).
  
  bypass_pem_cache(_Config) ->
      {ok, Result} = do_test(ssl, pem_cache, 100, 500, node()),
      ct_event:notify(#event{name = benchmark_data,
                             data=[{value, Result},
                                   {suite, "ssl"}, {name, "Bypass PEM cache"}]}).
  
  
  ssl() ->
  