Сравнить результат выполнения команды в tcl/tk

if { [ string equal [exec "some_command"] "some_string" ] } { puts "123"; }

как-то так (не помню точно про exec)

А вообще посмотри в сторону expect, оно тоже на tcl. Как раз сравнивать результаты тестов и что-то делать когда поступил "ожидаемый" текст (типа интерактивно управлять по ftp/telnet, etc)

в tcl [..] аналог `...`, только ... должно быть tcl-коммандой. {XXX} или [XXX] -- это строки с XXX, которые отложенно вычисляются в нужный момент времени ( if {cond} {do-true} {do-false} просто вычисляет нужные строки в момент при выполнении if; puts [eval $myvar] вычисляет myvar до выполнения puts)

> Как следующую команду на bash переписать в tcl/tk:

Да почти что так же

> if [ `some_command` == "some_scring" ] ; then echo 123 fi

if { [ exec $command ] == $string } {
puts 123
}