{ local $opt = { 'mysql_config' => 'mysql_config', 'embedded' => '', 'ssl' => 0, 'nocatchstderr' => 0, 'libs' => '-pipe -no-cpp-precomp -L/usr/lib/mysql -lmysqlclient -lz -lm', 'testhost' => '', 'nofoundrows' => 0, 'testdb' => 'test', 'cflags' => '-I/usr/include/mysql -fno-omit-frame-pointer -pipe -no-cpp-precomp', 'testuser' => '', '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;