Lo que hace o debería de hacer este script es consultar la base de datos (de este equipo) y sacar información. Pero por la versión instalada no es posible. Me pide tenga el DBI; para esto existe una nueva versión, la 1.604, pero no es compatible con Perl así que baje la 1.37, pero no me la deja instalar (make). ¿Cómo puedo yo ejecutar un programa en este equipo para realizar una consulta considerando lo que les acabo de comentar?
Saludos cordiales.
El script que utilizo
Using perl Syntax Highlighting
#!/usr/bin/perl -w
use lib "/tmp/ejemplo/DBI-1.37";
package ConectarDB;
use strict;
use DBI;
#------------------------------
my $db_user = "t";
my $db_pass = "t0";
my $host_name = "localhost";
my $db_name = "iMapAlarmDB";
#------------------------------
my $q_string = "DBI:sybase:host=$host_name;database=$db_name";
sub connect
{
return (DBI->connect ($q_string, $db_user, $db_pass,
{PrintError => 0, RaiseError => 1}));
}
1;
use lib "/tmp/ejemplo/DBI-1.37";
package ConectarDB;
use strict;
use DBI;
#------------------------------
my $db_user = "t";
my $db_pass = "t0";
my $host_name = "localhost";
my $db_name = "iMapAlarmDB";
#------------------------------
my $q_string = "DBI:sybase:host=$host_name;database=$db_name";
sub connect
{
return (DBI->connect ($q_string, $db_user, $db_pass,
{PrintError => 0, RaiseError => 1}));
}
1;
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
El error.
- Código: Seleccionar todo
k01% perl uno.pl
Can't locate loadable object for module DBI in @INC (@INC contains: /tmp/ejemplo/DBI-1.37 /usr/perl5/5.00503/sun4-solaris /usr/perl5/5.00503 /usr/perl5/site_perl/5.005/sun4-solaris /usr/perl5/site_perl/5.005 .) at /tmp/ejemplo/DBI-1.37/DBI.pm line 255
BEGIN failed--compilation aborted at /tmp/ejemplo/DBI-1.37/DBI.pm line 255.
BEGIN failed--compilation aborted at uno.pl line 6.
sigue sin poder cargar. Una pregunta: ¿cómo instalaría DBI-1.32 con 