• Publicidad

webservice con Perl

Así que programas sin strict y las expresiones regulares son otro modo de hablar. Aquí encontrarás respuestas de nivel avanzado, no recomendable para los débiles de corazón.

webservice con Perl

Notapor nelson224 » 2009-04-02 19:19 @846

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?
nelson224
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2009-04-02 18:48 @825

Publicidad

Notapor explorer » 2009-04-03 05:00 @250

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.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor nelson224 » 2009-04-08 14:57 @664

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.002 segundos, usando GeSHi 1.0.8.4
nelson224
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2009-04-02 18:48 @825

Notapor explorer » 2009-04-08 18:19 @804

¿Y qué es lo que dice el registro de error del servidor web?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor nelson224 » 2009-04-08 18:36 @817

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
nelson224
Perlero nuevo
Perlero nuevo
 
Mensajes: 3
Registrado: 2009-04-02 18:48 @825

Notapor explorer » 2009-04-08 18:40 @819

Efectivamente: el módulo SOAP::Lite no está instalado.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Avanzado

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 6 invitados