package require sqlite3

set test 0

# sql DB
sqlite3 dbs $db

proc test { } {
  global test
  set sql "SELECT * FROM test;"
  set result [dbs eval $sql]
  if {$test} {
    putlog "$result"
  }
}

test