Foro - Perl en Español

Publicado: **2012-05-30 13:41 @611**

Hola amigos. a Ver si me podéis echar una mano. Me apasiona este lenguaje, pero me encuentra con un problemilla.

Recientemente me compré la licencia del perl2exe para Windows y he tenido diferentes problemas a la hora de compilar con el programa perl2exe. La verdad sea que siempre fueron solventados pues en la red siempre me dieron soluciones.

Ahora me encuentro con uno que no salgo. Es un programa escrito en Tk que realiza unas tareas de mantenimiento en una base de datos MySQL externa a través del módulo DBI.

Cuando compilo me da errores referentes a que no localiza las .dll, he probado diferentes fórmulas de incluirlas al compilar, pero no consigo que funcione.

Me imagino con tanta gente experta en Perl por este foro, encuentre a alguien, que de seguro, se haya encontrado con el mismo problema.

Por otro lado ¿existe algún compilador que genere exe más recomendado que compile desde Windows para diferentes S.O. como lo hace el perl2exe?

Otra cuestión para el administrador del foro: estoy suscrito desde hace mucho tiempo ya a algunos foros y nunca recibo los correos de nuevos hilos, ¿es normal esto?

Gracias, un saludo a todos los perleros.

Publicado: **2012-05-30 14:29 @645**

Hay más hilos hablando de perl2exe. Usa el sistema de búsqueda.

Si quieres recibir actualizaciones, es mejor que te unas al twitter @perlenespanol. O mediante los canales RSS (el general es rss/news/digest/rss.xml )

Publicado: **2012-05-30 15:26 @684**

Bueno, después de alguna prueba lo conseguí, así que dejo un ejemplo y los pasos de como lo conseguí por si alguna otra persona se encuentra con el mismo problema en un futuro.

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#perl2exe_include Tk
use DBI;
use DBD::mysql;
use Tk;
 
my $mw = MainWindow->new;
$mw->title('perl en espanyol');
$mw->geometry('200x30');
my $hello = $mw->Button(
    -text    => 'Ver Tablas',
    -command => \&Ver_Tablas
);
my $exit = $mw->Button(
    -text    => 'Salir',
    -command => [ $mw => 'destroy' ]
);
$hello->pack( -side => 'left' );
$exit->pack( -side => 'right' );
MainLoop;
 
sub Ver_Tablas {
    my $Entry_MYSQL_Tipo     = "mysql";
    my $Entry_MYSQL_Servidor = "0.0.0.0";
    my $Entry_MYSQL_Usuario  = "usuario";
    my $Entry_MYSQL_Clave    = "clave";
    my $Entry_MYSQL_Basedato = "mibd";
 
    my $dbh_leer = DBI->connect( "DBI:$Entry_MYSQL_Tipo:database=$Entry_MYSQL_Basedato;host=$Entry_MYSQL_Servidor",
        "$Entry_MYSQL_Usuario", "$Entry_MYSQL_Clave" );
    my $sth = $dbh_leer->prepare("show tables");
    if ( !$sth ) {
        die "Error:" . $dbh_leer->errstr . "\n";
    }
    if ( !$sth->execute ) {
        die "Error:" . $sth->errstr . "\n";
    }
 
    while ( @row = $sth->fetchrow_array ) {
        print "$row[0]\n";
    }
}
 
Coloreado en 0.005 segundos,  usando GeSHi 1.0.8.4

Lo compilo con perl2exe de la siguiente manera:

perl2exe.exe vertablas.pl

Nos generará el fichero ejecutable “vertablas.exe”. Si ejecutamos “vertablas.exe” nos encontraremos con un error de que no se localiza “libmysql.dll”.

Buscar “libmysql.dll” en “auto/DBD/mysql/”.

Copiamos “libmysql.dll” en el mismo directorio donde se ejecuta “vertablas.exe” y al fin funciona.

Nota: no incluir tal y como indica Indigo

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

#perl2exe_include DBI 

#perl2exe_include DBD::mysqlColoreado en 0.000 segundos,  usando GeSHi 1.0.8.4

Espero que os sirva de ayuda,
Diego

Foro - Perl en Español

Compilando con perl2exe y DBI (mysql)

Compilando con perl2exe y DBI (mysql)

Re: Compilando con perl2exe y DBI (mysql)

Re: Compilando con perl2exe y DBI (mysql)