re = rex.new ("^.+$")
--re = rex.new ("^.")

local str = "While traversing the busy, cobbled streets of Darkhaven, you notice"

local s, e, t

start = utils.timer ()
for i = 1, 1e6 do
  s, e, t = re:exec (str)
end -- for
finish = utils.timer ()

print ("time taken = ", finish - start)

DatabaseOpen ("db", GetInfo (66) .. "mytestdb.sqlite", 6)

DatabaseExec ("db", [[
DROP TABLE IF EXISTS weapons;
CREATE TABLE weapons(
        weapon_id INTEGER NOT NULL PRIMARY KEY autoincrement,
        name  TEXT NOT NULL,
        damage INT default 10,
        weight REAL
      );
      ]])

start = utils.timer ()

DatabaseExec ("db", "BEGIN TRANSACTION")

for i = 1, 10000 do  
  DatabaseExec ("db", "INSERT INTO weapons (name, damage) VALUES ('sword', 42)")
end -- for
  
DatabaseExec ("db", "COMMIT")

finish = utils.timer ()

print ("time taken = ", finish - start)
print ("changes = ", DatabaseTotalChanges ("db"))

DatabaseClose ("db")  -- close it

time taken =  0.76090487452166
changes =  10000

DatabaseOpen ("db", GetInfo (66) .. "mytestdb.sqlite", 6)

start = utils.timer ()

local count = 0

DatabasePrepare ("db", "SELECT * from weapons")

-- execute to get the first row
rc = DatabaseStep ("db")  -- read first row

-- now loop, displaying each row, and getting the next one
while rc == sqlite3.ROW do
  
  count = count + 1
  local id =  DatabaseColumnValue ("db", 1)  -- get some data
 
  rc = DatabaseStep ("db")  -- read next row
end -- while loop

-- done with statement
DatabaseFinalize ("db")

finish = utils.timer ()

print ("time taken = ", finish - start)
print ("read = ", count)

DatabaseClose ("db")  -- close it

time taken =  0.022610129890381
read =  10000