my $dsn = 'DBI:mysql:' . join( ";", 'database=' . $data->{'database'}, 'host=' . $data->{'server'}, 'port=' . $data->{'port'}, 'mysql_enable_utf8=1' ); my $dbh = DBI->connect( $dsn, $data->{'user'}, $data->{'password'}, { RaiseError => 0, PrintError => 1, AutoCommit => 0, mysql_enable_utf8 => 0 } ) or die( DBI->errstr() );