Some examples of tcl and sqlite usage:

NOTE: the name of the database is opendb

   * Retrieve the names of the tables stored in a sqlite database:

======
   set tableNames [opendb eval {SELECT tbl_name FROM sqlite_master}]
puts $tableNames
======


   * Retrieve the names of the columns tored in a sqlite database(variable columnName):
====== 
   opendb eval "SELECT * FROM $tableName LIMIT 1" x {set columnName $x(*)} 
puts $columnName
======


[jnc] You can also use the `PRAGMA` statement `table_info(table_name`) to retrieve column information. See http://sqlite.org/pragma.html for a list of all `PRAGMA` statements.


   * Retrieve the row data from a table
======
opendb eval "Select * FROM $i" values {set rowData $values(*)} 
foreach a $rowData {set rowList "$values($a)"}
puts $rowValues
                
======

<<categories>>Enter Category Here