Yet Another CPAN Grep

Mojo-UserAgent-SecureServer ( J/JH/JHTHORSEN/Mojo-UserAgent-SecureServer-0.04.tar.gz, JHTHORSEN, 2022; MetaCPAN )

Mojo-UserAgent-SecureServer/lib/Mojo/UserAgent/SecureServer.pm ( view source; MetaCPAN )

c      = shift;
    my $handle = Mojo::IOLoop->stream($c->tx->connection)->handle;
    $c->render(json => {cn => $handle->peer_certificate('cn')});
  });

  my $t = Test::Mojo->new($app);
  $t->ua->in

->ua->server(Mojo::UserAgent::SecureServer->from_ua($t->ua));

  $t->get_ok('/')->status_is(200)->json_is('/cn', 'mojo.example.com');

=head1 DESCRIPTION

L<Mojo::UserAgent::SecureServer> allows you t