[Nicolas]

Estoy tratando de conectar una bd de DB2 con Perl pero mi conexión falla, les dejo el query cómo está:

$dbh = DBI->connect ("dbi:DB2:basedatos", usuario, pass) or die "Can't connect to sample database: $DBI::errstr";

Y este es el error:

Can't connect to sample database: [IBM][CLI Driver] SQL1031N The database directory cannot be found on the indicated file system. SQLSTATE=58031

¿Qué puede estar pasando?

[Jhony10]

Prueba utilizando el string de conexión completo:

my $string = "dbi:DB2:DATABASE=$db; HOSTNAME=$hostname; PORT=$port; PROTOCOL=TCPIP; UID=$usuario; PWD=$pass;";
my $dbh = DBI->connect($string, $usuario, $pass) || die "Connection failed with error: $DBI::errstr";

[Nicolas]

Solucionado el error, gracias Jhony