1 package RemoteTestEngine;
4 if ($Catalyst::VERSION >= 5.89000) {
5 require Catalyst::Engine;
6 @ISA = qw(Catalyst::Engine);
8 require Catalyst::Engine::CGI;
9 @ISA = qw(Catalyst::Engine::CGI);
19 if ($Catalyst::VERSION >= 5.89000) {
20 %e = %{ $self->SUPER::env() };
25 $e{REMOTE_USER} = $REMOTE_USER;
26 $e{SSL_CLIENT_S_DN} = $SSL_CLIENT_S_DN;