私はリストのリストを返す手続きを持っています。最初に分割しないで内部リストにアクセスする方法を理解できません。私はきれいな方法がなければならないと確信しています。例えば 、これ： proc return_l_of_l {} {
set x {a b c}
set y {d e f}
return [list [list $x] [list $y]]
}
set l
リスト内の最初と最後に一致する単語や正規表現を見つける方法を探しています。以下のような 何か：正規表現は非常に遅くなることが set list "The dog rant to the field by the red house..."
set first [lsearch -regexp $list \[Tt\]he]
($first =0)
set last [lsearch -la
execとawk doe snot throwエラーを使用してSET変数の値を使用すると、値が抽出されません。このファイルの名前をIPとして127.0.0.1するrouteripの値を期待し set routername [lindex $argv 0]
set routerip "exec awk {{ /$routername/print \$2 }} /tmp/RIPTable"
pu