Tcl "list as string"をリストとしてintrpretするには？いくつかの未知の理由により、

Question

コード

set result [[$sqlCmd execute] allrows -as lists] 

の次の行で、変数resultは、リストのように見える文字列を取得します。私はputs "result $result => [llength $result]"を記述する場合、私はputs [list $result]を書く場合{2 3 4 5}

はそれが{2 3 4 5} => 1

を印刷し、 listは1つの文字列からリストを作成するので、それは{{2 3 4 5}}を印刷します。
この文字列を期待していたものに変換する方法はありますか？リスト - 中かっこを削除して文字列を分割するなどの文字列処理を行わずに、split関数のリストに文字列を分割しますか？私はそれが何らかの解釈でなければならないことを示唆していますが、私は素晴らしい解決策を見つけることができません。

Answer 1

allrowsは、リストを提供しています。各サブリストは行を表しています。このリストには1行があり、2 3 4 5なので、長さは1です。その要素にアクセスする通常の方法をリスト上で索引付けまたは反復することができます。

# If you're assuming there will only be one row 
set only_row [lindex $result 0] 

# Or if you want to iterate over all rows 
foreach row $result { 
    do whatever with $row 
} 

Answer 2

allrowsメソッドは、1行につき1つのリストを返します（返される行は1つだけです）。 -as listsオプションが渡されると、そのリストの各要素自体が、その行の列を表すリストになります。

したがって、その行の列を反復するために、あなたがしたい：それは持っているよう

set result [[$sqlCmd execute] allrows -as lists] 
set rowresult [lindex $result 0] 
foreach col $rowresult { 
    puts "I've got a '$col'" 
} 

あなたは通常、カラム名をインデックス辞書などの行を表し、デフォルトを使用することを推奨していますSQL NULLのより良い表現（すなわち、列が、ドライバ指定のヌル値の代わりに欠けています。これは、しばしば空の文字列です）。