Hola. al intentar conectarme a una base de datos e insertar me da fallo. Este es el codigo que utilizo:
#!/usr/bin/perl
use DBI;
my $dsn = 'DBI:mysql:bbdd:localhost;
my $db_user_name = 'name';
my $db_password = 'pssw';
my ($id, $password);
my $dbh = DBI -> connect($dsn, $db_user_name, $db_password);
my $sth = %dbh -> prepare (qq{
insert into alumnos (Nombre, Apellidos, Login, Contrasena) values (a,b,c,d)
});
$sth->execute();
$sth -> finish();
