Inspired by https://www.tcl.tk/community/tcl2004/Papers/D.RichardHipp/drh.html
./init.sh
sqlite3 --ascii --batch app.db ".schema"
sqlite3 --box --batch app.db "SELECT * FROM procedures;"
INSERT INTO procedures (name,arguments,body) VALUES ('::hello','name','puts "Hi $name."');
UPDATE procedures SET body=edit(body,'nano') WHERE id LIKE '01G2XRV8BVRY36Q3ETV67MY893';