mirror of
https://git.freebsd.org/ports.git
synced 2025-05-05 16:07:38 -04:00
4e00066ccb
Changes: https://www.sqlite.org/releaselog/3_35_5.html PR: 255392 Submitted by: Pavel Volkov <pavelivolkov AT gmail DOT com> (maintainer)
16 lines
247 B
Tcl
16 lines
247 B
Tcl
#!%%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
|