{ local $opt = { 'mysql_config' => 'mysql_config', 'embedded' => '', 'ssl' => 0, 'nocatchstderr' => 0, 'libs' => '-Wl,-Bsymbolic-functions -L/usr/lib/mysql -lmysqlclient', 'testhost' => '', 'nofoundrows' => 0, 'testdb' => 'test', 'cflags' => '-I/usr/include/mysql -DBIG_JOINS=1 -fPIC', 'testuser' => 'root', 'testpassword' => '', 'testsocket' => '' }; $::test_host = $opt->{'testhost'}; $::test_port = $opt->{'testport'}; $::test_user = $opt->{'testuser'}; $::test_socket = $opt->{'testsocket'}; $::test_password = $opt->{'testpassword'}; $::test_db = $opt->{'testdb'}; $::test_dsn = "DBI:mysql:$::test_db"; $::test_dsn .= ";mysql_socket=$::test_socket" if $::test_socket; $::test_dsn .= ":$::test_host" if $::test_host; $::test_dsn .= ":$::test_port" if $::test_port; } 1;