Página 1 de 1

webservice con Perl

NotaPublicado: 2009-04-02 19:19 @846
por nelson224
Hola a todos soy nuevo en Perl y me parece muy interesante, mi problema es que tengo una web que está en PHP con el cual consumo datos de un webservice pero la lectura de los datos es muy lenta y he leído que con Perl es más rápido leer del webservice. ¿Alguien me podría ayudar a hacer un programa en Perl que lea el webservice y los datos mostrarlos en PHP o guardarlos en MySQL?

NotaPublicado: 2009-04-03 05:00 @250
por explorer
Bienvenido a los foros de Perl en Español, nelson224.

Por aquí hay algunos hilos hablando del tema. Usa el sistema de búsqueda. Busca por webservice, SOAP y otros términos relacionados.

Al menos, ya tienes para empezar.

NotaPublicado: 2009-04-08 14:57 @664
por nelson224
explorer:

He seguido algunos ejemplos pero no consigo resultados.
me sale

Código: Seleccionar todo
Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator, admin@localhost and inform them of the time the error occurred, and anything you might have done that may have caused the error.

More information about this error may be available in the server error log.


Si pudieras darme una mano te agradecería bastante. El código que uso para consumir un webservice hecho en net es el siguiente:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
#!C:\perl\bin\perl.exe -w

use SOAP::Lite;

my $soap = SOAP::Lite
    -> uri('http://data.emprof.no/')
    -> on_action( sub { join '/', 'http://data.emprof.no', $_[1] } )
    -> proxy('http://data.emprof.no/wsdata01.asmx');

my $method = SOAP::Data->name('Search')
    ->attr({xmlns => 'http://data.emprof.no/'});

my @params = ( SOAP::Data->name('sIdentityKey')->value('C9E62C6A-341D-4B47-B68D-C987DB2731F1')->type('string') );
 
print $soap->call($method => @params)->result;
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

NotaPublicado: 2009-04-08 18:19 @804
por explorer
¿Y qué es lo que dice el registro de error del servidor web?

NotaPublicado: 2009-04-08 18:36 @817
por nelson224
Me sale eso, parece que no está bien instalado.
Lo que uso es el wamp server en WinXP y también instale el ActivePerl-5.10.0.1004-MSWin32-x86-287188.msi

Código: Seleccionar todo
[Wed Apr 08 18:32:13 2009] [error] [client 127.0.0.1] Premature end of script headers: prueba.cgi
[Wed Apr 08 18:32:13 2009] [error] [client 127.0.0.1] Can't locate SOAP/Lite.pm in @INC (@INC contains: C:/perl/site/lib C:/perl/lib .) at C:/wamp/bin/apache/apache2.2.8/cgi-bin/prueba.cgi line 6.\r
[Wed Apr 08 18:32:13 2009] [error] [client 127.0.0.1] BEGIN failed--compilation aborted at C:/wamp/bin/apache/apache2.2.8/cgi-bin/prueba.cgi line 6.\r

NotaPublicado: 2009-04-08 18:40 @819
por explorer
Efectivamente: el módulo SOAP::Lite no está instalado.