Posted to tcl by kostix at Sun Mar 22 21:07:57 GMT 2009view raw

  1. % sqlite db :memory:
  2. % db eval { create table foo (foo) }
  3. % set a s'trin'g
  4. s'trin'g
  5. % db eval { insert into foo (foo) values ($a) }
  6. % db eval { select * from foo }
  7. s'trin'g
  8.