¿Cómo puedo determinar qué certificado de cliente SSL está usando una conexión en mod_perl?

Question

Estoy escribiendo un servicio web en Perl que se ejecutará bajo SSL (HTTPS) con certificados de cliente. ¿Cómo puedo determinar qué certificado está utilizando el cliente en la conexión actual para poder filtrar los no deseados?

Nota: el servicio web se está ejecutando como una secuencia de comandos mod_perl.

Answer 1

encontrado la respuesta en PerlMonks:

Usa el Apache::SSLLookup module

sub handler { 
    my $r = Apache::SSLLookup->new(shift); 
    my $request_is_over_ssl = $r->is_https; 
    my $certificate = $r->lookup_var('SSL_CLIENT_CERT'); 

    ... 
    } 

mod_ssl entorno de referencia here.