Ver Tema

Vertik · 2011-09-05 09:41 @445

¡Hola a todos!

Espero que el verano bien

Bueno, aquí vuelta al trabajo y ¡me he encontrado con una dificultad! Suerte de vosotros ¡je,je,je!

Esta es:

Syntax: [ Download ] [ Hide ]

Using text Syntax Highlighting

Can't load module HTML::Parser, dynamic loading not available in this perl.

  (You may need to build a new perl executable which either supports

  dynamic loading or has the HTML::Parser module statically linked into it.)

 at /usr/local/lib/perl/5.10.1/HTML/Entities.pm line 154

Compilation failed in require at /usr/local/lib/perl/5.10.1/HTML/Entities.pm line 154.

Estoy lanzando un código Perl (funciona) desde C++ y surge este error. Es como si no supiera linkar este módulo.

¿Alguna sugerencia?

Gracias

explorer · 2011-09-05 10:02 @460

Lo tienes respondido en perlembed, sección Using Perl modules, which themselves use C libraries, from your C program

Vertik · 2011-09-06 05:34 @273

¡¡¡Gracias, explorer!!!

Como bien dices, aparece en esa web.

Lo explicare por aquí si os parece bien (por si alguien llega al foro y ve la pregunta). (Nota: mi nivel no es alto, así que seguro que habrá una manera más fácil de hacerlo.)

Lo que he hecho para solucionar el problema es crear el fichero:

xsinit.cpp

Syntax: [ Download ] [ Hide ]

Using cpp Syntax Highlighting

EXTERN_C void
xs_init(pTHX)
{
        char *file = __FILE__;
        dXSUB_SYS;
 
        /* DynaLoader is a special case */
        newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
}

Con su header xsinit.h

Syntax: [ Download ] [ Hide ]

Using cpp Syntax Highlighting

#include <EXTERN.h>
#include <perl.h>
 
EXTERN_C void xs_init (pTHX);
 
EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);

Luego en la llamada para introducir los parámetros necesarios para ejecutar el Perl desde C, se modifica:

perl_parse(my_perl, NULL, argc, my_argv,NULL);

por

perl_parse(my_perl, xs_init, argc, my_argv,NULL);

xs_init() realiza "magia" (indica al intérprete de Perl cómo linkar los ficheros a usar) y el error desaparece y ya puedes usar normalmente el use "Modulo::X".

¡Espero que sea de ayuda a todos!

¡Mil gracias, explorer!

Publicidad

Socializa