TDBC and MariaDB (use MySQL driver)

下面是一個測試程式：

#!/usr/bin/env tclsh

package require tdbc::mysql
tdbc::mysql::connection create db -user root -passwd admin -host 127.0.0.1 -port 3306 -database test

set statement [db prepare {
    SELECT VERSION() as version
}]


$statement foreach row {
    puts [dict get $row version]
}

$statement close

db close

在 openSUSE Leap 15.0 上測試，需要安裝 libmariadb-devel 才能夠正確執行。我的 libmariadb-devel 來源是 http://download.opensuse.org/repositories/server:/database/openSUSE_Leap_15.0/，因為我之前需要安裝跟資料庫有關的軟體，所以有使用這個 repository。