$SERVER = IO::Socket::SSL->new(  Proto     => 'tcp',
                                 LocalPort => $LISTEN_PORT,
                                 Listen    => 5,
                                 ReuseAddr => 1,

                                 %ssl_opts,
                              );