auth.t

my $ioloop = Mojo::IOLoop->singleton;
my $daemon = Mojo::Server::Daemon->new(app => app, ioloop => $ioloop);
my $port   = Mojo::IOLoop->generate_port;
$daemon->listen(
  [     "https://127.0.0.1:$port"
      . '?cert=t/certs/server.crt'
      . '&key=t/certs/server.key'
      . '&ca=t/certs/ca.crt'
  ]
)->start;

## Success - expected common name
my $ua = Mojo::UserAgent->new(
  ioloop => $ioloop,
  cert   => 't/certs/client.crt',
  key    => 't/certs/client.key'
);
my $t = Test::Mojo->new(app => app, ua => $ua);
$t->get_ok("https://127.0.0.1:$port")->status_is(200)->content_is('ok');