db1 eval {INSERT INTO t1 VALUES(5,$bigstring)}
t"INSERT INTO mytable VALUES ({s}, {s[::-1]})"
mydb eval {INSERT INTO mytable VALUES ($s, [string reverse $s])}
set t [string reverse $s] mydb eval {INSERT INTO mytable VALUES ($s, $t)}