database/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2026-01-06 05:22:24 +03:00
Code Activity

Switch Perl DBI scripts from DBD::mysql to DBD::MariaDB driver

Browse Source 
Perl DBD::MariaDB driver is available CPAN and is already used in
production environment.
This commit is contained in:
Pali
2019-06-07 16:30:27 +02:00
committed by Robert Bindar
parent 9a7d96e832
commit 5cc2096f93
35 changed files with 161 additions and 166 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
plugin/handler_socket/regtest/common/hstest.pm
View File

@@ -29,10 +29,10 @@ sub get_dbi_connection {
= ($conf{dbname}, $conf{host}, $conf{myport}, $conf{ssps},
$conf{user}, $conf{pass});
my $mycnf = "binary_my.cnf";
my $dsn = "DBI:mysql:database=;host=$host;port=$myport"
. ";mysql_server_prepare=$ssps"
. ";mysql_read_default_group=perl"
. ";mysql_read_default_file=../common/$mycnf";
my $dsn = "DBI:MariaDB:database=;host=$host;port=$myport"
. ";mariadb_server_prepare=$ssps"
. ";mariadb_read_default_group=perl"
. ";mariadb_read_default_file=../common/$mycnf";
my $dbh = DBI->connect($dsn, $user, $pass, { RaiseError => 1 });
return $dbh;
}