Ако искате да запазите връзката отворена, просто се обадете
mysql::ping $dbhandle
от време на време.
Това може да стане с нещо подобно:
proc keepMySqlOpen {dbhandle} {
mysql::ping $dbhandle
after 2000 [list keepMySqlOpen $dbhandle]
}
....
set dbh [mysql::open ...]
keepMySqlOpen $dbh
...
Друга възможност е просто да използвате mysql::ping
преди достъп до db, което трябва според ръководство за mysqltcl
свържете отново, ако е необходимо. Това може да е най-доброто от двата свята (оставете връзката да изтече, ако няма много активност, в противен случай я оставете отворена).