Hola,
Tengo un problema con los die() a la hora de ejecutar sentencias erróneas en bases de datos; el caso es que mi código de prueba es el siguiente:
use DBI;
use ConnectDB;
use strict;
use warnings;
use diagnostics;
db_exists();
sub db_exists{
my $dbc = createdb->connect();
my @status = $dbc->do ('USE IDS1') or die "Couldn't execute statement: ";
print "@status\n";
}
Evidentemente la base de datos IDS1 no existe, que es el que ...