/ Hex Artifact Content
Login

Artifact fa2188bbb13fe2d183fd04a5f7b512650c35ef5d:


0000: 23 20 32 30 31 30 20 41 75 67 75 73 74 20 34 0a  # 2010 August 4.
0010: 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20 64  #.# The author d
0020: 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67  isclaims copyrig
0030: 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63  ht to this sourc
0040: 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63  e code.  In plac
0050: 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e  e of.# a legal n
0060: 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20 61  otice, here is a
0070: 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20   blessing:.#.#  
0080: 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f    May you do goo
0090: 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a  d and not evil..
00a0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e  #    May you fin
00b0: 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f  d forgiveness fo
00c0: 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66  r yourself and f
00d0: 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23  orgive others..#
00e0: 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72      May you shar
00f0: 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20  e freely, never 
0100: 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e  taking more than
0110: 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a   you give..#.#**
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 0a 23 0a 23 20 54 68 65 20 66 6f  *****.#.# The fo
0170: 63 75 73 20 6f 66 20 74 68 69 73 20 66 69 6c 65  cus of this file
0180: 20 69 73 20 74 65 73 74 69 6e 67 20 74 68 65 20   is testing the 
0190: 43 4c 49 20 73 68 65 6c 6c 20 74 6f 6f 6c 2e 0a  CLI shell tool..
01a0: 23 20 54 68 65 73 65 20 74 65 73 74 73 20 61 72  # These tests ar
01b0: 65 20 73 70 65 63 69 66 69 63 20 74 6f 20 74 68  e specific to th
01c0: 65 20 2e 69 6d 70 6f 72 74 20 63 6f 6d 6d 61 6e  e .import comman
01d0: 64 2e 0a 23 0a 23 20 24 49 64 3a 20 73 68 65 6c  d..#.# $Id: shel
01e0: 6c 35 2e 74 65 73 74 2c 76 20 31 2e 37 20 32 30  l5.test,v 1.7 20
01f0: 30 39 2f 30 37 2f 31 37 20 31 36 3a 35 34 3a 34  09/07/17 16:54:4
0200: 38 20 73 68 61 6e 65 68 20 45 78 70 20 24 0a 23  8 shaneh Exp $.#
0210: 0a 0a 23 20 54 65 73 74 20 70 6c 61 6e 3a 0a 23  ..# Test plan:.#
0220: 0a 23 20 20 20 73 68 65 6c 6c 35 2d 31 2e 2a 3a  .#   shell5-1.*:
0230: 20 42 61 73 69 63 20 74 65 73 74 73 20 73 70 65   Basic tests spe
0240: 63 69 66 69 63 20 74 6f 20 74 68 65 20 22 2e 69  cific to the ".i
0250: 6d 70 6f 72 74 22 20 63 6f 6d 6d 61 6e 64 2e 0a  mport" command..
0260: 23 0a 73 65 74 20 74 65 73 74 64 69 72 20 5b 66  #.set testdir [f
0270: 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 61 72 67  ile dirname $arg
0280: 76 30 5d 0a 73 6f 75 72 63 65 20 24 74 65 73 74  v0].source $test
0290: 64 69 72 2f 74 65 73 74 65 72 2e 74 63 6c 0a 69  dir/tester.tcl.i
02a0: 66 20 7b 24 74 63 6c 5f 70 6c 61 74 66 6f 72 6d  f {$tcl_platform
02b0: 28 70 6c 61 74 66 6f 72 6d 29 3d 3d 22 77 69 6e  (platform)=="win
02c0: 64 6f 77 73 22 7d 20 7b 0a 20 20 73 65 74 20 43  dows"} {.  set C
02d0: 4c 49 20 22 73 71 6c 69 74 65 33 2e 65 78 65 22  LI "sqlite3.exe"
02e0: 0a 7d 20 65 6c 73 65 20 7b 0a 20 20 73 65 74 20  .} else {.  set 
02f0: 43 4c 49 20 22 2e 2f 73 71 6c 69 74 65 33 22 0a  CLI "./sqlite3".
0300: 7d 0a 69 66 20 7b 21 5b 66 69 6c 65 20 65 78 65  }.if {![file exe
0310: 63 75 74 61 62 6c 65 20 24 43 4c 49 5d 7d 20 7b  cutable $CLI]} {
0320: 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a 20  .  finish_test. 
0330: 20 72 65 74 75 72 6e 0a 7d 0a 64 62 20 63 6c 6f   return.}.db clo
0340: 73 65 0a 66 6f 72 63 65 64 65 6c 65 74 65 20 74  se.forcedelete t
0350: 65 73 74 2e 64 62 20 74 65 73 74 2e 64 62 2d 6a  est.db test.db-j
0360: 6f 75 72 6e 61 6c 20 74 65 73 74 2e 64 62 2d 77  ournal test.db-w
0370: 61 6c 0a 73 71 6c 69 74 65 33 20 64 62 20 74 65  al.sqlite3 db te
0380: 73 74 2e 64 62 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d  st.db..#--------
0390: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
03a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
03b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
03c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
03d0: 2d 2d 2d 2d 0a 23 20 54 65 73 74 20 63 61 73 65  ----.# Test case
03e0: 73 20 73 68 65 6c 6c 35 2d 31 2e 2a 3a 20 42 61  s shell5-1.*: Ba
03f0: 73 69 63 20 68 61 6e 64 6c 69 6e 67 20 6f 66 20  sic handling of 
0400: 74 68 65 20 2e 69 6d 70 6f 72 74 20 61 6e 64 20  the .import and 
0410: 2e 73 65 70 61 72 61 74 6f 72 20 63 6f 6d 6d 61  .separator comma
0420: 6e 64 73 2e 0a 23 0a 0a 23 20 2e 69 6d 70 6f 72  nds..#..# .impor
0430: 74 20 46 49 4c 45 20 54 41 42 4c 45 20 20 20 20  t FILE TABLE    
0440: 20 49 6d 70 6f 72 74 20 64 61 74 61 20 66 72 6f   Import data fro
0450: 6d 20 46 49 4c 45 20 69 6e 74 6f 20 54 41 42 4c  m FILE into TABL
0460: 45 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35  E.do_test shell5
0470: 2d 31 2e 31 2e 31 20 7b 0a 20 20 63 61 74 63 68  -1.1.1 {.  catch
0480: 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20 22 2e  cmd "test.db" ".
0490: 69 6d 70 6f 72 74 22 0a 7d 20 7b 31 20 7b 45 72  import".} {1 {Er
04a0: 72 6f 72 3a 20 75 6e 6b 6e 6f 77 6e 20 63 6f 6d  ror: unknown com
04b0: 6d 61 6e 64 20 6f 72 20 69 6e 76 61 6c 69 64 20  mand or invalid 
04c0: 61 72 67 75 6d 65 6e 74 73 3a 20 20 22 69 6d 70  arguments:  "imp
04d0: 6f 72 74 22 2e 20 45 6e 74 65 72 20 22 2e 68 65  ort". Enter ".he
04e0: 6c 70 22 20 66 6f 72 20 68 65 6c 70 7d 7d 0a 64  lp" for help}}.d
04f0: 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d 31 2e  o_test shell5-1.
0500: 31 2e 32 20 7b 0a 20 20 63 61 74 63 68 63 6d 64  1.2 {.  catchcmd
0510: 20 22 74 65 73 74 2e 64 62 22 20 22 2e 69 6d 70   "test.db" ".imp
0520: 6f 72 74 20 46 4f 4f 22 0a 7d 20 7b 31 20 7b 45  ort FOO".} {1 {E
0530: 72 72 6f 72 3a 20 75 6e 6b 6e 6f 77 6e 20 63 6f  rror: unknown co
0540: 6d 6d 61 6e 64 20 6f 72 20 69 6e 76 61 6c 69 64  mmand or invalid
0550: 20 61 72 67 75 6d 65 6e 74 73 3a 20 20 22 69 6d   arguments:  "im
0560: 70 6f 72 74 22 2e 20 45 6e 74 65 72 20 22 2e 68  port". Enter ".h
0570: 65 6c 70 22 20 66 6f 72 20 68 65 6c 70 7d 7d 0a  elp" for help}}.
0580: 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d 31  do_test shell5-1
0590: 2e 31 2e 32 20 7b 0a 20 20 63 61 74 63 68 63 6d  .1.2 {.  catchcm
05a0: 64 20 22 74 65 73 74 2e 64 62 22 20 22 2e 69 6d  d "test.db" ".im
05b0: 70 6f 72 74 20 46 4f 4f 20 42 41 52 22 0a 7d 20  port FOO BAR".} 
05c0: 7b 31 20 7b 45 72 72 6f 72 3a 20 6e 6f 20 73 75  {1 {Error: no su
05d0: 63 68 20 74 61 62 6c 65 3a 20 42 41 52 7d 7d 0a  ch table: BAR}}.
05e0: 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d 31  do_test shell5-1
05f0: 2e 31 2e 33 20 7b 0a 20 20 23 20 74 6f 6f 20 6d  .1.3 {.  # too m
0600: 61 6e 79 20 61 72 67 75 6d 65 6e 74 73 0a 20 20  any arguments.  
0610: 63 61 74 63 68 63 6d 64 20 22 74 65 73 74 2e 64  catchcmd "test.d
0620: 62 22 20 22 2e 69 6d 70 6f 72 74 20 46 4f 4f 20  b" ".import FOO 
0630: 42 41 52 20 42 41 44 22 0a 7d 20 7b 31 20 7b 45  BAR BAD".} {1 {E
0640: 72 72 6f 72 3a 20 75 6e 6b 6e 6f 77 6e 20 63 6f  rror: unknown co
0650: 6d 6d 61 6e 64 20 6f 72 20 69 6e 76 61 6c 69 64  mmand or invalid
0660: 20 61 72 67 75 6d 65 6e 74 73 3a 20 20 22 69 6d   arguments:  "im
0670: 70 6f 72 74 22 2e 20 45 6e 74 65 72 20 22 2e 68  port". Enter ".h
0680: 65 6c 70 22 20 66 6f 72 20 68 65 6c 70 7d 7d 0a  elp" for help}}.
0690: 0a 23 20 2e 73 65 70 61 72 61 74 6f 72 20 53 54  .# .separator ST
06a0: 52 49 4e 47 20 20 20 20 20 20 43 68 61 6e 67 65  RING      Change
06b0: 20 73 65 70 61 72 61 74 6f 72 20 75 73 65 64 20   separator used 
06c0: 62 79 20 6f 75 74 70 75 74 20 6d 6f 64 65 20 61  by output mode a
06d0: 6e 64 20 2e 69 6d 70 6f 72 74 0a 64 6f 5f 74 65  nd .import.do_te
06e0: 73 74 20 73 68 65 6c 6c 31 2d 31 2e 32 2e 31 20  st shell1-1.2.1 
06f0: 7b 0a 20 20 63 61 74 63 68 63 6d 64 20 22 74 65  {.  catchcmd "te
0700: 73 74 2e 64 62 22 20 22 2e 73 65 70 61 72 61 74  st.db" ".separat
0710: 6f 72 22 0a 7d 20 7b 31 20 7b 45 72 72 6f 72 3a  or".} {1 {Error:
0720: 20 75 6e 6b 6e 6f 77 6e 20 63 6f 6d 6d 61 6e 64   unknown command
0730: 20 6f 72 20 69 6e 76 61 6c 69 64 20 61 72 67 75   or invalid argu
0740: 6d 65 6e 74 73 3a 20 20 22 73 65 70 61 72 61 74  ments:  "separat
0750: 6f 72 22 2e 20 45 6e 74 65 72 20 22 2e 68 65 6c  or". Enter ".hel
0760: 70 22 20 66 6f 72 20 68 65 6c 70 7d 7d 0a 64 6f  p" for help}}.do
0770: 5f 74 65 73 74 20 73 68 65 6c 6c 31 2d 31 2e 32  _test shell1-1.2
0780: 2e 32 20 7b 0a 20 20 63 61 74 63 68 63 6d 64 20  .2 {.  catchcmd 
0790: 22 74 65 73 74 2e 64 62 22 20 22 2e 73 65 70 61  "test.db" ".sepa
07a0: 72 61 74 6f 72 20 46 4f 4f 22 0a 7d 20 7b 30 20  rator FOO".} {0 
07b0: 7b 7d 7d 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c  {}}.do_test shel
07c0: 6c 31 2d 31 2e 32 2e 33 20 7b 0a 20 20 23 20 74  l1-1.2.3 {.  # t
07d0: 6f 6f 20 6d 61 6e 79 20 61 72 67 75 6d 65 6e 74  oo many argument
07e0: 73 0a 20 20 63 61 74 63 68 63 6d 64 20 22 74 65  s.  catchcmd "te
07f0: 73 74 2e 64 62 22 20 22 2e 73 65 70 61 72 61 74  st.db" ".separat
0800: 6f 72 20 46 4f 4f 20 42 41 44 22 0a 7d 20 7b 31  or FOO BAD".} {1
0810: 20 7b 45 72 72 6f 72 3a 20 75 6e 6b 6e 6f 77 6e   {Error: unknown
0820: 20 63 6f 6d 6d 61 6e 64 20 6f 72 20 69 6e 76 61   command or inva
0830: 6c 69 64 20 61 72 67 75 6d 65 6e 74 73 3a 20 20  lid arguments:  
0840: 22 73 65 70 61 72 61 74 6f 72 22 2e 20 45 6e 74  "separator". Ent
0850: 65 72 20 22 2e 68 65 6c 70 22 20 66 6f 72 20 68  er ".help" for h
0860: 65 6c 70 7d 7d 0a 0a 23 20 73 65 70 61 72 61 74  elp}}..# separat
0870: 6f 72 20 73 68 6f 75 6c 64 20 64 65 66 61 75 6c  or should defaul
0880: 74 20 74 6f 20 22 7c 22 0a 64 6f 5f 74 65 73 74  t to "|".do_test
0890: 20 73 68 65 6c 6c 35 2d 31 2e 33 2e 31 20 7b 0a   shell5-1.3.1 {.
08a0: 20 20 73 65 74 20 72 65 73 20 5b 63 61 74 63 68    set res [catch
08b0: 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20 22 2e  cmd "test.db" ".
08c0: 73 68 6f 77 22 5d 0a 20 20 6c 69 73 74 20 5b 72  show"].  list [r
08d0: 65 67 65 78 70 20 7b 73 65 70 61 72 61 74 6f 72  egexp {separator
08e0: 3a 20 5c 22 5c 7c 5c 22 7d 20 24 72 65 73 5d 0a  : \"\|\"} $res].
08f0: 7d 20 7b 31 7d 0a 0a 23 20 73 65 74 20 73 65 70  } {1}..# set sep
0900: 61 72 61 74 6f 72 20 74 6f 20 64 69 66 66 65 72  arator to differ
0910: 65 6e 74 20 76 61 6c 75 65 2e 0a 23 20 63 68 65  ent value..# che
0920: 63 6b 20 74 68 61 74 20 2e 73 68 6f 77 20 72 65  ck that .show re
0930: 70 6f 72 74 73 20 6e 65 77 20 76 61 6c 75 65 0a  ports new value.
0940: 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d 31  do_test shell5-1
0950: 2e 33 2e 32 20 7b 0a 20 20 73 65 74 20 72 65 73  .3.2 {.  set res
0960: 20 5b 63 61 74 63 68 63 6d 64 20 22 74 65 73 74   [catchcmd "test
0970: 2e 64 62 22 20 7b 2e 73 65 70 61 72 61 74 6f 72  .db" {.separator
0980: 20 2c 0a 2e 73 68 6f 77 7d 5d 0a 20 20 6c 69 73   ,..show}].  lis
0990: 74 20 5b 72 65 67 65 78 70 20 7b 73 65 70 61 72  t [regexp {separ
09a0: 61 74 6f 72 3a 20 5c 22 2c 5c 22 7d 20 24 72 65  ator: \",\"} $re
09b0: 73 5d 0a 7d 20 7b 31 7d 0a 0a 23 20 69 6d 70 6f  s].} {1}..# impo
09c0: 72 74 20 66 69 6c 65 20 64 6f 65 73 6e 27 74 20  rt file doesn't 
09d0: 65 78 69 73 74 0a 64 6f 5f 74 65 73 74 20 73 68  exist.do_test sh
09e0: 65 6c 6c 35 2d 31 2e 34 2e 31 20 7b 0a 20 20 66  ell5-1.4.1 {.  f
09f0: 69 6c 65 20 64 65 6c 65 74 65 20 2d 66 6f 72 63  ile delete -forc
0a00: 65 20 46 4f 4f 0a 20 20 73 65 74 20 72 65 73 20  e FOO.  set res 
0a10: 5b 63 61 74 63 68 63 6d 64 20 22 74 65 73 74 2e  [catchcmd "test.
0a20: 64 62 22 20 7b 43 52 45 41 54 45 20 54 41 42 4c  db" {CREATE TABL
0a30: 45 20 74 31 28 61 2c 20 62 29 3b 0a 2e 69 6d 70  E t1(a, b);..imp
0a40: 6f 72 74 20 46 4f 4f 20 74 31 7d 5d 0a 7d 20 7b  ort FOO t1}].} {
0a50: 31 20 7b 45 72 72 6f 72 3a 20 63 61 6e 6e 6f 74  1 {Error: cannot
0a60: 20 6f 70 65 6e 20 22 46 4f 4f 22 7d 7d 0a 0a 23   open "FOO"}}..#
0a70: 20 65 6d 70 74 79 20 69 6d 70 6f 72 74 20 66 69   empty import fi
0a80: 6c 65 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c  le.do_test shell
0a90: 35 2d 31 2e 34 2e 32 20 7b 0a 20 20 66 69 6c 65  5-1.4.2 {.  file
0aa0: 20 64 65 6c 65 74 65 20 2d 66 6f 72 63 65 20 73   delete -force s
0ab0: 68 65 6c 6c 35 2e 63 73 76 0a 20 20 73 65 74 20  hell5.csv.  set 
0ac0: 69 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35 2e  in [open shell5.
0ad0: 63 73 76 20 77 5d 0a 20 20 63 6c 6f 73 65 20 24  csv w].  close $
0ae0: 69 6e 0a 20 20 73 65 74 20 72 65 73 20 5b 63 61  in.  set res [ca
0af0: 74 63 68 63 6d 64 20 22 74 65 73 74 2e 64 62 22  tchcmd "test.db"
0b00: 20 7b 2e 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35   {.import shell5
0b10: 2e 63 73 76 20 74 31 0a 53 45 4c 45 43 54 20 43  .csv t1.SELECT C
0b20: 4f 55 4e 54 28 2a 29 20 46 52 4f 4d 20 74 31 3b  OUNT(*) FROM t1;
0b30: 7d 5d 0a 7d 20 7b 30 20 30 7d 0a 0a 23 20 69 6d  }].} {0 0}..# im
0b40: 70 6f 72 74 20 66 69 6c 65 20 77 69 74 68 20 31  port file with 1
0b50: 20 72 6f 77 2c 20 31 20 63 6f 6c 75 6d 6e 20 28   row, 1 column (
0b60: 65 78 70 65 63 74 69 6e 67 20 32 20 63 6f 6c 73  expecting 2 cols
0b70: 29 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35  ).do_test shell5
0b80: 2d 31 2e 34 2e 33 20 7b 0a 20 20 73 65 74 20 69  -1.4.3 {.  set i
0b90: 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35 2e 63  n [open shell5.c
0ba0: 73 76 20 77 5d 0a 20 20 70 75 74 73 20 24 69 6e  sv w].  puts $in
0bb0: 20 22 31 22 0a 20 20 63 6c 6f 73 65 20 24 69 6e   "1".  close $in
0bc0: 0a 20 20 73 65 74 20 72 65 73 20 5b 63 61 74 63  .  set res [catc
0bd0: 68 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20 7b  hcmd "test.db" {
0be0: 2e 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35 2e 63  .import shell5.c
0bf0: 73 76 20 74 31 7d 5d 0a 7d 20 7b 31 20 7b 45 72  sv t1}].} {1 {Er
0c00: 72 6f 72 3a 20 73 68 65 6c 6c 35 2e 63 73 76 20  ror: shell5.csv 
0c10: 6c 69 6e 65 20 31 3a 20 65 78 70 65 63 74 65 64  line 1: expected
0c20: 20 32 20 63 6f 6c 75 6d 6e 73 20 6f 66 20 64 61   2 columns of da
0c30: 74 61 20 62 75 74 20 66 6f 75 6e 64 20 31 7d 7d  ta but found 1}}
0c40: 0a 0a 23 20 69 6d 70 6f 72 74 20 66 69 6c 65 20  ..# import file 
0c50: 77 69 74 68 20 31 20 72 6f 77 2c 20 33 20 63 6f  with 1 row, 3 co
0c60: 6c 75 6d 6e 73 20 28 65 78 70 65 63 74 69 6e 67  lumns (expecting
0c70: 20 32 20 63 6f 6c 73 29 0a 64 6f 5f 74 65 73 74   2 cols).do_test
0c80: 20 73 68 65 6c 6c 35 2d 31 2e 34 2e 34 20 7b 0a   shell5-1.4.4 {.
0c90: 20 20 73 65 74 20 69 6e 20 5b 6f 70 65 6e 20 73    set in [open s
0ca0: 68 65 6c 6c 35 2e 63 73 76 20 77 5d 0a 20 20 70  hell5.csv w].  p
0cb0: 75 74 73 20 24 69 6e 20 22 31 7c 32 7c 33 22 0a  uts $in "1|2|3".
0cc0: 20 20 63 6c 6f 73 65 20 24 69 6e 0a 20 20 73 65    close $in.  se
0cd0: 74 20 72 65 73 20 5b 63 61 74 63 68 63 6d 64 20  t res [catchcmd 
0ce0: 22 74 65 73 74 2e 64 62 22 20 7b 2e 69 6d 70 6f  "test.db" {.impo
0cf0: 72 74 20 73 68 65 6c 6c 35 2e 63 73 76 20 74 31  rt shell5.csv t1
0d00: 7d 5d 0a 7d 20 7b 31 20 7b 45 72 72 6f 72 3a 20  }].} {1 {Error: 
0d10: 73 68 65 6c 6c 35 2e 63 73 76 20 6c 69 6e 65 20  shell5.csv line 
0d20: 31 3a 20 65 78 70 65 63 74 65 64 20 32 20 63 6f  1: expected 2 co
0d30: 6c 75 6d 6e 73 20 6f 66 20 64 61 74 61 20 62 75  lumns of data bu
0d40: 74 20 66 6f 75 6e 64 20 33 7d 7d 0a 0a 23 20 69  t found 3}}..# i
0d50: 6d 70 6f 72 74 20 66 69 6c 65 20 77 69 74 68 20  mport file with 
0d60: 31 20 72 6f 77 2c 20 32 20 63 6f 6c 75 6d 6e 73  1 row, 2 columns
0d70: 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d  .do_test shell5-
0d80: 31 2e 34 2e 35 20 7b 0a 20 20 73 65 74 20 69 6e  1.4.5 {.  set in
0d90: 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35 2e 63 73   [open shell5.cs
0da0: 76 20 77 5d 0a 20 20 70 75 74 73 20 24 69 6e 20  v w].  puts $in 
0db0: 22 31 7c 32 22 0a 20 20 63 6c 6f 73 65 20 24 69  "1|2".  close $i
0dc0: 6e 0a 20 20 73 65 74 20 72 65 73 20 5b 63 61 74  n.  set res [cat
0dd0: 63 68 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20  chcmd "test.db" 
0de0: 7b 2e 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35 2e  {.import shell5.
0df0: 63 73 76 20 74 31 0a 53 45 4c 45 43 54 20 43 4f  csv t1.SELECT CO
0e00: 55 4e 54 28 2a 29 20 46 52 4f 4d 20 74 31 3b 7d  UNT(*) FROM t1;}
0e10: 5d 0a 7d 20 7b 30 20 31 7d 0a 0a 23 20 69 6d 70  ].} {0 1}..# imp
0e20: 6f 72 74 20 66 69 6c 65 20 77 69 74 68 20 32 20  ort file with 2 
0e30: 72 6f 77 73 2c 20 32 20 63 6f 6c 75 6d 6e 73 0a  rows, 2 columns.
0e40: 23 20 6e 6f 74 65 20 77 65 20 65 6e 64 20 75 70  # note we end up
0e50: 20 77 69 74 68 20 33 20 72 6f 77 73 20 62 65 63   with 3 rows bec
0e60: 61 75 73 65 20 6f 66 20 74 68 65 20 31 20 72 6f  ause of the 1 ro
0e70: 77 20 0a 23 20 69 6d 70 6f 72 74 65 64 20 61 62  w .# imported ab
0e80: 6f 76 65 2e 0a 64 6f 5f 74 65 73 74 20 73 68 65  ove..do_test she
0e90: 6c 6c 35 2d 31 2e 34 2e 36 20 7b 0a 20 20 73 65  ll5-1.4.6 {.  se
0ea0: 74 20 69 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c  t in [open shell
0eb0: 35 2e 63 73 76 20 77 5d 0a 20 20 70 75 74 73 20  5.csv w].  puts 
0ec0: 24 69 6e 20 22 32 7c 33 22 0a 20 20 70 75 74 73  $in "2|3".  puts
0ed0: 20 24 69 6e 20 22 33 7c 34 22 0a 20 20 63 6c 6f   $in "3|4".  clo
0ee0: 73 65 20 24 69 6e 0a 20 20 73 65 74 20 72 65 73  se $in.  set res
0ef0: 20 5b 63 61 74 63 68 63 6d 64 20 22 74 65 73 74   [catchcmd "test
0f00: 2e 64 62 22 20 7b 2e 69 6d 70 6f 72 74 20 73 68  .db" {.import sh
0f10: 65 6c 6c 35 2e 63 73 76 20 74 31 0a 53 45 4c 45  ell5.csv t1.SELE
0f20: 43 54 20 43 4f 55 4e 54 28 2a 29 20 46 52 4f 4d  CT COUNT(*) FROM
0f30: 20 74 31 3b 7d 5d 0a 7d 20 7b 30 20 33 7d 0a 0a   t1;}].} {0 3}..
0f40: 23 20 69 6d 70 6f 72 74 20 66 69 6c 65 20 77 69  # import file wi
0f50: 74 68 20 31 20 72 6f 77 2c 20 32 20 63 6f 6c 75  th 1 row, 2 colu
0f60: 6d 6e 73 2c 20 75 73 69 6e 67 20 61 20 63 6f 6d  mns, using a com
0f70: 6d 61 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c  ma.do_test shell
0f80: 35 2d 31 2e 34 2e 37 20 7b 0a 20 20 73 65 74 20  5-1.4.7 {.  set 
0f90: 69 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35 2e  in [open shell5.
0fa0: 63 73 76 20 77 5d 0a 20 20 70 75 74 73 20 24 69  csv w].  puts $i
0fb0: 6e 20 22 34 2c 35 22 0a 20 20 63 6c 6f 73 65 20  n "4,5".  close 
0fc0: 24 69 6e 0a 20 20 73 65 74 20 72 65 73 20 5b 63  $in.  set res [c
0fd0: 61 74 63 68 63 6d 64 20 22 74 65 73 74 2e 64 62  atchcmd "test.db
0fe0: 22 20 7b 2e 73 65 70 61 72 61 74 6f 72 20 2c 0a  " {.separator ,.
0ff0: 2e 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35 2e 63  .import shell5.c
1000: 73 76 20 74 31 0a 53 45 4c 45 43 54 20 43 4f 55  sv t1.SELECT COU
1010: 4e 54 28 2a 29 20 46 52 4f 4d 20 74 31 3b 7d 5d  NT(*) FROM t1;}]
1020: 0a 7d 20 7b 30 20 34 7d 0a 0a 23 20 69 6d 70 6f  .} {0 4}..# impo
1030: 72 74 20 66 69 6c 65 20 77 69 74 68 20 31 20 72  rt file with 1 r
1040: 6f 77 2c 20 32 20 63 6f 6c 75 6d 6e 73 2c 20 74  ow, 2 columns, t
1050: 65 78 74 20 64 61 74 61 0a 64 6f 5f 74 65 73 74  ext data.do_test
1060: 20 73 68 65 6c 6c 35 2d 31 2e 34 2e 38 2e 31 20   shell5-1.4.8.1 
1070: 7b 0a 20 20 73 65 74 20 69 6e 20 5b 6f 70 65 6e  {.  set in [open
1080: 20 73 68 65 6c 6c 35 2e 63 73 76 20 77 5d 0a 20   shell5.csv w]. 
1090: 20 70 75 74 73 20 24 69 6e 20 22 35 7c 4e 6f 77   puts $in "5|Now
10a0: 20 69 73 20 74 68 65 20 74 69 6d 65 20 66 6f 72   is the time for
10b0: 20 61 6c 6c 20 67 6f 6f 64 20 6d 65 6e 20 74 6f   all good men to
10c0: 20 63 6f 6d 65 20 74 6f 20 74 68 65 20 61 69 64   come to the aid
10d0: 20 6f 66 20 74 68 65 69 72 20 63 6f 75 6e 74 72   of their countr
10e0: 79 2e 22 0a 20 20 63 6c 6f 73 65 20 24 69 6e 0a  y.".  close $in.
10f0: 20 20 73 65 74 20 72 65 73 20 5b 63 61 74 63 68    set res [catch
1100: 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20 7b 2e  cmd "test.db" {.
1110: 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35 2e 63 73  import shell5.cs
1120: 76 20 74 31 0a 53 45 4c 45 43 54 20 43 4f 55 4e  v t1.SELECT COUN
1130: 54 28 2a 29 20 46 52 4f 4d 20 74 31 3b 7d 5d 0a  T(*) FROM t1;}].
1140: 7d 20 7b 30 20 35 7d 0a 0a 64 6f 5f 74 65 73 74  } {0 5}..do_test
1150: 20 73 68 65 6c 6c 35 2d 31 2e 34 2e 38 2e 32 20   shell5-1.4.8.2 
1160: 7b 0a 20 20 63 61 74 63 68 63 6d 64 20 22 74 65  {.  catchcmd "te
1170: 73 74 2e 64 62 22 20 7b 53 45 4c 45 43 54 20 62  st.db" {SELECT b
1180: 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 61   FROM t1 WHERE a
1190: 3d 27 35 27 3b 7d 0a 7d 20 7b 30 20 7b 4e 6f 77  ='5';}.} {0 {Now
11a0: 20 69 73 20 74 68 65 20 74 69 6d 65 20 66 6f 72   is the time for
11b0: 20 61 6c 6c 20 67 6f 6f 64 20 6d 65 6e 20 74 6f   all good men to
11c0: 20 63 6f 6d 65 20 74 6f 20 74 68 65 20 61 69 64   come to the aid
11d0: 20 6f 66 20 74 68 65 69 72 20 63 6f 75 6e 74 72   of their countr
11e0: 79 2e 7d 7d 0a 0a 23 20 69 6d 70 6f 72 74 20 66  y.}}..# import f
11f0: 69 6c 65 20 77 69 74 68 20 31 20 72 6f 77 2c 20  ile with 1 row, 
1200: 32 20 63 6f 6c 75 6d 6e 73 2c 20 71 75 6f 74 65  2 columns, quote
1210: 64 20 74 65 78 74 20 64 61 74 61 0a 23 20 6e 6f  d text data.# no
1220: 74 65 20 74 68 61 74 20 63 75 72 72 65 6e 74 6c  te that currentl
1230: 79 20 73 71 6c 69 74 65 20 64 6f 65 73 6e 27 74  y sqlite doesn't
1240: 20 73 75 70 70 6f 72 74 20 71 75 6f 74 65 64 20   support quoted 
1250: 66 69 65 6c 64 73 2c 20 61 6e 64 0a 23 20 69 6d  fields, and.# im
1260: 70 6f 72 74 73 20 74 68 65 20 65 6e 74 69 72 65  ports the entire
1270: 20 66 69 65 6c 64 2c 20 71 75 6f 74 65 73 20 61   field, quotes a
1280: 6e 64 20 61 6c 6c 2e 0a 64 6f 5f 74 65 73 74 20  nd all..do_test 
1290: 73 68 65 6c 6c 35 2d 31 2e 34 2e 39 2e 31 20 7b  shell5-1.4.9.1 {
12a0: 0a 20 20 73 65 74 20 69 6e 20 5b 6f 70 65 6e 20  .  set in [open 
12b0: 73 68 65 6c 6c 35 2e 63 73 76 20 77 5d 0a 20 20  shell5.csv w].  
12c0: 70 75 74 73 20 24 69 6e 20 22 36 7c 27 4e 6f 77  puts $in "6|'Now
12d0: 20 69 73 20 74 68 65 20 74 69 6d 65 20 66 6f 72   is the time for
12e0: 20 61 6c 6c 20 67 6f 6f 64 20 6d 65 6e 20 74 6f   all good men to
12f0: 20 63 6f 6d 65 20 74 6f 20 74 68 65 20 61 69 64   come to the aid
1300: 20 6f 66 20 74 68 65 69 72 20 63 6f 75 6e 74 72   of their countr
1310: 79 2e 27 22 0a 20 20 63 6c 6f 73 65 20 24 69 6e  y.'".  close $in
1320: 0a 20 20 73 65 74 20 72 65 73 20 5b 63 61 74 63  .  set res [catc
1330: 68 63 6d 64 20 22 74 65 73 74 2e 64 62 22 20 7b  hcmd "test.db" {
1340: 2e 69 6d 70 6f 72 74 20 73 68 65 6c 6c 35 2e 63  .import shell5.c
1350: 73 76 20 74 31 0a 53 45 4c 45 43 54 20 43 4f 55  sv t1.SELECT COU
1360: 4e 54 28 2a 29 20 46 52 4f 4d 20 74 31 3b 7d 5d  NT(*) FROM t1;}]
1370: 0a 7d 20 7b 30 20 36 7d 0a 0a 64 6f 5f 74 65 73  .} {0 6}..do_tes
1380: 74 20 73 68 65 6c 6c 35 2d 31 2e 34 2e 39 2e 32  t shell5-1.4.9.2
1390: 20 7b 0a 20 20 63 61 74 63 68 63 6d 64 20 22 74   {.  catchcmd "t
13a0: 65 73 74 2e 64 62 22 20 7b 53 45 4c 45 43 54 20  est.db" {SELECT 
13b0: 62 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20  b FROM t1 WHERE 
13c0: 61 3d 27 36 27 3b 7d 0a 7d 20 7b 30 20 7b 27 4e  a='6';}.} {0 {'N
13d0: 6f 77 20 69 73 20 74 68 65 20 74 69 6d 65 20 66  ow is the time f
13e0: 6f 72 20 61 6c 6c 20 67 6f 6f 64 20 6d 65 6e 20  or all good men 
13f0: 74 6f 20 63 6f 6d 65 20 74 6f 20 74 68 65 20 61  to come to the a
1400: 69 64 20 6f 66 20 74 68 65 69 72 20 63 6f 75 6e  id of their coun
1410: 74 72 79 2e 27 7d 7d 0a 0a 23 20 69 6d 70 6f 72  try.'}}..# impor
1420: 74 20 66 69 6c 65 20 77 69 74 68 20 31 20 72 6f  t file with 1 ro
1430: 77 2c 20 32 20 63 6f 6c 75 6d 6e 73 2c 20 71 75  w, 2 columns, qu
1440: 6f 74 65 64 20 74 65 78 74 20 64 61 74 61 0a 64  oted text data.d
1450: 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35 2d 31 2e  o_test shell5-1.
1460: 34 2e 31 30 2e 31 20 7b 0a 20 20 73 65 74 20 69  4.10.1 {.  set i
1470: 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35 2e 63  n [open shell5.c
1480: 73 76 20 77 5d 0a 20 20 70 75 74 73 20 24 69 6e  sv w].  puts $in
1490: 20 22 37 7c 5c 22 4e 6f 77 20 69 73 20 74 68 65   "7|\"Now is the
14a0: 20 74 69 6d 65 20 66 6f 72 20 61 6c 6c 20 67 6f   time for all go
14b0: 6f 64 20 6d 65 6e 20 74 6f 20 63 6f 6d 65 20 74  od men to come t
14c0: 6f 20 74 68 65 20 61 69 64 20 6f 66 20 74 68 65  o the aid of the
14d0: 69 72 20 63 6f 75 6e 74 72 79 2e 5c 22 22 0a 20  ir country.\"". 
14e0: 20 63 6c 6f 73 65 20 24 69 6e 0a 20 20 73 65 74   close $in.  set
14f0: 20 72 65 73 20 5b 63 61 74 63 68 63 6d 64 20 22   res [catchcmd "
1500: 74 65 73 74 2e 64 62 22 20 7b 2e 69 6d 70 6f 72  test.db" {.impor
1510: 74 20 73 68 65 6c 6c 35 2e 63 73 76 20 74 31 0a  t shell5.csv t1.
1520: 53 45 4c 45 43 54 20 43 4f 55 4e 54 28 2a 29 20  SELECT COUNT(*) 
1530: 46 52 4f 4d 20 74 31 3b 7d 5d 0a 7d 20 7b 30 20  FROM t1;}].} {0 
1540: 37 7d 0a 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c  7}..do_test shel
1550: 6c 35 2d 31 2e 34 2e 31 30 2e 32 20 7b 0a 20 20  l5-1.4.10.2 {.  
1560: 63 61 74 63 68 63 6d 64 20 22 74 65 73 74 2e 64  catchcmd "test.d
1570: 62 22 20 7b 53 45 4c 45 43 54 20 62 20 46 52 4f  b" {SELECT b FRO
1580: 4d 20 74 31 20 57 48 45 52 45 20 61 3d 27 37 27  M t1 WHERE a='7'
1590: 3b 7d 0a 7d 20 7b 30 20 7b 4e 6f 77 20 69 73 20  ;}.} {0 {Now is 
15a0: 74 68 65 20 74 69 6d 65 20 66 6f 72 20 61 6c 6c  the time for all
15b0: 20 67 6f 6f 64 20 6d 65 6e 20 74 6f 20 63 6f 6d   good men to com
15c0: 65 20 74 6f 20 74 68 65 20 61 69 64 20 6f 66 20  e to the aid of 
15d0: 74 68 65 69 72 20 63 6f 75 6e 74 72 79 2e 7d 7d  their country.}}
15e0: 0a 0a 23 20 63 68 65 63 6b 20 69 6d 70 6f 72 74  ..# check import
15f0: 69 6e 67 20 76 65 72 79 20 6c 6f 6e 67 20 66 69  ing very long fi
1600: 65 6c 64 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c  eld.do_test shel
1610: 6c 35 2d 31 2e 35 2e 31 20 7b 0a 20 20 73 65 74  l5-1.5.1 {.  set
1620: 20 73 74 72 20 5b 73 74 72 69 6e 67 20 72 65 70   str [string rep
1630: 65 61 74 20 58 20 39 39 39 5d 0a 20 20 73 65 74  eat X 999].  set
1640: 20 69 6e 20 5b 6f 70 65 6e 20 73 68 65 6c 6c 35   in [open shell5
1650: 2e 63 73 76 20 77 5d 0a 20 20 70 75 74 73 20 24  .csv w].  puts $
1660: 69 6e 20 22 38 7c 24 73 74 72 22 0a 20 20 63 6c  in "8|$str".  cl
1670: 6f 73 65 20 24 69 6e 0a 20 20 73 65 74 20 72 65  ose $in.  set re
1680: 73 20 5b 63 61 74 63 68 63 6d 64 20 22 74 65 73  s [catchcmd "tes
1690: 74 2e 64 62 22 20 7b 2e 69 6d 70 6f 72 74 20 73  t.db" {.import s
16a0: 68 65 6c 6c 35 2e 63 73 76 20 74 31 0a 53 45 4c  hell5.csv t1.SEL
16b0: 45 43 54 20 6c 65 6e 67 74 68 28 62 29 20 46 52  ECT length(b) FR
16c0: 4f 4d 20 74 31 20 57 48 45 52 45 20 61 3d 27 38  OM t1 WHERE a='8
16d0: 27 3b 7d 5d 0a 7d 20 7b 30 20 39 39 39 7d 0a 0a  ';}].} {0 999}..
16e0: 23 20 74 72 79 20 69 6d 70 6f 72 74 69 6e 67 20  # try importing 
16f0: 69 6e 74 6f 20 61 20 74 61 62 6c 65 20 77 69 74  into a table wit
1700: 68 20 61 20 6c 61 72 67 65 20 6e 75 6d 62 65 72  h a large number
1710: 20 6f 66 20 63 6f 6c 75 6d 6e 73 2e 0a 23 20 54   of columns..# T
1720: 68 69 73 20 69 73 20 6c 69 6d 69 74 65 64 20 62  his is limited b
1730: 79 20 53 51 4c 49 54 45 5f 4d 41 58 5f 56 41 52  y SQLITE_MAX_VAR
1740: 49 41 42 4c 45 5f 4e 55 4d 42 45 52 2c 20 77 68  IABLE_NUMBER, wh
1750: 69 63 68 20 64 65 66 61 75 6c 74 73 20 74 6f 20  ich defaults to 
1760: 39 39 39 2e 0a 73 65 74 20 63 6f 6c 73 20 39 39  999..set cols 99
1770: 39 0a 64 6f 5f 74 65 73 74 20 73 68 65 6c 6c 35  9.do_test shell5
1780: 2d 31 2e 36 2e 31 20 7b 0a 20 20 73 65 74 20 73  -1.6.1 {.  set s
1790: 71 6c 20 7b 43 52 45 41 54 45 20 54 41 42 4c 45  ql {CREATE TABLE
17a0: 20 74 32 28 7d 0a 20 20 73 65 74 20 64 61 74 61   t2(}.  set data
17b0: 20 7b 7d 0a 20 20 66 6f 72 20 7b 73 65 74 20 69   {}.  for {set i
17c0: 20 31 7d 20 7b 24 69 3c 24 63 6f 6c 73 7d 20 7b   1} {$i<$cols} {
17d0: 69 6e 63 72 20 69 7d 20 7b 0a 20 20 20 20 61 70  incr i} {.    ap
17e0: 70 65 6e 64 20 73 71 6c 20 22 63 24 69 2c 22 0a  pend sql "c$i,".
17f0: 20 20 20 20 61 70 70 65 6e 64 20 64 61 74 61 20      append data 
1800: 22 24 69 7c 22 0a 20 20 7d 0a 20 20 61 70 70 65  "$i|".  }.  appe
1810: 6e 64 20 73 71 6c 20 22 63 24 63 6f 6c 73 29 3b  nd sql "c$cols);
1820: 22 0a 20 20 61 70 70 65 6e 64 20 64 61 74 61 20  ".  append data 
1830: 22 24 63 6f 6c 73 22 0a 20 20 63 61 74 63 68 63  "$cols".  catchc
1840: 6d 64 20 22 74 65 73 74 2e 64 62 22 20 24 73 71  md "test.db" $sq
1850: 6c 0a 20 20 73 65 74 20 69 6e 20 5b 6f 70 65 6e  l.  set in [open
1860: 20 73 68 65 6c 6c 35 2e 63 73 76 20 77 5d 0a 20   shell5.csv w]. 
1870: 20 70 75 74 73 20 24 69 6e 20 24 64 61 74 61 0a   puts $in $data.
1880: 20 20 63 6c 6f 73 65 20 24 69 6e 0a 20 20 73 65    close $in.  se
1890: 74 20 72 65 73 20 5b 63 61 74 63 68 63 6d 64 20  t res [catchcmd 
18a0: 22 74 65 73 74 2e 64 62 22 20 7b 2e 69 6d 70 6f  "test.db" {.impo
18b0: 72 74 20 73 68 65 6c 6c 35 2e 63 73 76 20 74 32  rt shell5.csv t2
18c0: 0a 53 45 4c 45 43 54 20 43 4f 55 4e 54 28 2a 29  .SELECT COUNT(*)
18d0: 20 46 52 4f 4d 20 74 32 3b 7d 5d 0a 7d 20 7b 30   FROM t2;}].} {0
18e0: 20 31 7d 0a 0a 23 20 74 72 79 20 69 6d 70 6f 72   1}..# try impor
18f0: 74 69 6e 67 20 61 20 6c 61 72 67 65 20 6e 75 6d  ting a large num
1900: 62 65 72 20 6f 66 20 72 6f 77 73 0a 73 65 74 20  ber of rows.set 
1910: 72 6f 77 73 20 39 39 39 39 39 39 0a 64 6f 5f 74  rows 999999.do_t
1920: 65 73 74 20 73 68 65 6c 6c 35 2d 31 2e 37 2e 31  est shell5-1.7.1
1930: 20 7b 0a 20 20 73 65 74 20 69 6e 20 5b 6f 70 65   {.  set in [ope
1940: 6e 20 73 68 65 6c 6c 35 2e 63 73 76 20 77 5d 0a  n shell5.csv w].
1950: 20 20 66 6f 72 20 7b 73 65 74 20 69 20 31 7d 20    for {set i 1} 
1960: 7b 24 69 3c 3d 24 72 6f 77 73 7d 20 7b 69 6e 63  {$i<=$rows} {inc
1970: 72 20 69 7d 20 7b 0a 20 20 20 20 70 75 74 73 20  r i} {.    puts 
1980: 24 69 6e 20 24 69 0a 20 20 7d 0a 20 20 63 6c 6f  $in $i.  }.  clo
1990: 73 65 20 24 69 6e 0a 20 20 73 65 74 20 72 65 73  se $in.  set res
19a0: 20 5b 63 61 74 63 68 63 6d 64 20 22 74 65 73 74   [catchcmd "test
19b0: 2e 64 62 22 20 7b 43 52 45 41 54 45 20 54 41 42  .db" {CREATE TAB
19c0: 4c 45 20 74 33 28 61 29 3b 0a 2e 69 6d 70 6f 72  LE t3(a);..impor
19d0: 74 20 73 68 65 6c 6c 35 2e 63 73 76 20 74 33 0a  t shell5.csv t3.
19e0: 53 45 4c 45 43 54 20 43 4f 55 4e 54 28 2a 29 20  SELECT COUNT(*) 
19f0: 46 52 4f 4d 20 74 33 3b 7d 5d 0a 7d 20 5b 6c 69  FROM t3;}].} [li
1a00: 73 74 20 30 20 24 72 6f 77 73 5d 0a 0a 66 69 6e  st 0 $rows]..fin
1a10: 69 73 68 5f 74 65 73 74 0a                       ish_test.