Help for this page
my $dbh = DBI->connect($dsn,$user,$password, { RaiseError => 1, AutoCommit => 0 }) || die "Database connection failed: $DBI::errstr";