summaryrefslogtreecommitdiff
path: root/databases/sqlite3/files/example.tcl.in
diff options
context:
space:
mode:
authorNeel Chauhan <nc@FreeBSD.org>2021-04-27 10:03:07 -0700
committerNeel Chauhan <nc@FreeBSD.org>2021-04-27 10:03:07 -0700
commit4e00066ccb9699f670b9a3be411b13bc26a932f2 (patch)
tree53f0db46c2c421a3a3ec78f93ed02e707d4c87a1 /databases/sqlite3/files/example.tcl.in
parentmath/mingw32-libgmp: mark BROKEN on FreeBSD >= 13 (diff)
databases/sqlite3: Update to 3.35.5
Changes: https://www.sqlite.org/releaselog/3_35_5.html PR: 255392 Submitted by: Pavel Volkov <pavelivolkov AT gmail DOT com> (maintainer)
Diffstat (limited to 'databases/sqlite3/files/example.tcl.in')
-rw-r--r--databases/sqlite3/files/example.tcl.in16
1 files changed, 16 insertions, 0 deletions
diff --git a/databases/sqlite3/files/example.tcl.in b/databases/sqlite3/files/example.tcl.in
new file mode 100644
index 000000000000..0f8aab96e1f1
--- /dev/null
+++ b/databases/sqlite3/files/example.tcl.in
@@ -0,0 +1,16 @@
+#!%%TCLSH_CMD%%
+
+package require sqlite3
+
+if {$argc!=2} {
+ puts stderr "Usage: $argv0 DATABASE SQL-STATEMENT"
+ exit 1
+}
+sqlite3 db [lindex $argv 0]
+db eval [lindex $argv 1] x {
+ foreach v $x(*) {
+ puts "$v = $x($v)"
+ }
+ puts ""
+}
+db close