Posted to tcl by Poor Yorick at Tue Mar 08 13:41:04 GMT 2022view pretty
package require sqlite3 sqlite3 db db eval { create table t1 ( c1 text ) } set value [binary format H* f09f9299] puts [::tcl::unsupported::representation $value] db eval { insert into t1 values ('f09f9299') } puts [db eval {select typeof(c1) from t1}] puts [db eval {select typeof(c1) from t1 where c1 = $value}]