Foro - Perl en Español

por **dom87** » 2011-07-08 12:17 @553

Saludos a todos,
el problema es este: tengo en un script el siguiente código para consumir un servicio de autentificación con LDAP hecho en PHP:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

use SOAP::Lite +trace => [qw(debug)];
my $client = SOAP::Lite->service($url) || die "error";
my $resultado = $client->autenticarUsuario($user,$pass,$dominio);
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

al poner el debug tengo esta salida:

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

<?xml version="1.0" encoding="UTF-8"?><soap:Envelope xmlns:typens="urn:PasarelaAutenticacionWS" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body><typens:autenticarUsuario><pUsuario xsi:type="xsd:string">user</pUsuario><pContrasenna xsi:type="xsd:string">pass</pContrasenna><pDominio xsi:type="xsd:string">dominio</pDominio></typens:autenticarUsuario></soap:Body></soap:Envelope>

SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 200 OK

Connection: close

Date: Fri, 08 Jul 2011 17:07:06 GMT

Server: Apache

Content-Length: 0

Content-Type: text/html; charset=utf-8

Client-Date: Fri, 08 Jul 2011 17:07:32 GMT

Client-Peer: 10.0.0.219:443

Client-Response-Num: 1

Client-SSL-Cert-Issuer: /C=--/ST=SomeState/L=SomeCity/O=SomeOrganization/OU=SomeOrganizationalUnit/CN=webserver6.uci.cu/[email protected]

Client-SSL-Cert-Subject: /C=--/ST=SomeState/L=SomeCity/O=SomeOrganization/OU=SomeOrganizationalUnit/CN=webserver6.uci.cu/[email protected]

Client-SSL-Cipher: DHE-RSA-AES256-SHA

Client-SSL-Warning: Peer certificate not verifiedColoreado en 0.000 segundos,  usando GeSHi 1.0.8.4

por lo que puedo notar en la salida da un Warnig de certificado no verificado, (NOTA: el protocolo que se usa para el valor de $url es HTTPS), además no tengo ningún resultado al hacer la llamada de la función autenticarUsuario(), pienso que el warning tiene algo que ver.

Cualquier opinión la agradezco, gracias de antemano.

Foro - Perl en Español

Cliente Perl consumiendo servicio PHP

Cliente Perl consumiendo servicio PHP

Publicidad

¿Quién está conectado?