tclshの使い方

何かと便利なtclshですが、最近GroupStudyメーリングリストで話題に上がっていたのでいつでも使えるようサンプルスクリプトをメモっておきます。

tclsh
foreach i {
192.168.1.1
192.168.1.2
192.168.1.3
} { ping $i }
tclquit

IOS 12.3Tでは挙動が異なるので、以下のようにすると良い。

tclsh
foreach i {
192.168.1.1
192.168.1.2
192.168.1.3
} {puts [exec "ping $i"]}
tclquit

確か以前Foota-netのkazuさんも同じ事を言ってたような・・・

↓この本で勉強中です。
Tcl/Tkデスクトップリファレンス Programming tools