##
my $server = Net::Async::WebSocket::Server->new(
...
);
####
my $loop = IO::Async::Loop->new;
$loop->add( $server );
$server->listen(
handle => $sslSocket
)->get;
####
while($loop->loop_once(0.0001) > 0) {
};