1 package RemoteTestApp2;
8 __PACKAGE__->engine_class('RemoteTestEngine');
10 'Plugin::Authentication' => {
11 default_realm => 'remote',
16 allow_regexp => '^(bob|john|CN=.*)$',
17 deny_regexp=> 'denied',
18 cutname_regexp=> 'CN=(.*)/OU=Test',
19 source => 'SSL_CLIENT_S_DN',
30 my ( $self, $c ) = @_;
31 if ($c->authenticate()) {
32 $c->res->body('User:' . $c->user->{id});
35 $c->res->body('FAIL');
41 my ( $self, $c ) = @_;