Необязательный аргумент для spawn

Question

Я пытаюсь создать процесс с аргументом, который может (или нет) присутствовать. Мой реальный код выглядит следующим образом:

set optionalParam "" 

if { somecondition } { 
    set optionalParam someValue 
} 

spawn foo.sh paramA paramB "param C" $optionalParam 

Проблема происходит, когда somecondition ложно. foo.sh видит дополнительный параметр с пустым значением (например, "").

Каков правильный способ сделать это?

Answer 1

Если у вас есть Tcl 8.5 или более поздней версии, вы определенно следует использовать расширяющийся замену:

set optionalParam [list] 
if { somecondition } { 
    lappend optionalParam someValue 
} 

spawn foo.sh paramA paramB "param C" {*}$optionalParam 

---

В 8.4 и выше, вы вместо того, вынуждены использовать что-то вроде этого:

set optionalParam [list] 
if { somecondition } { 
    lappend optionalParam someValue 
} 

eval [list spawn foo.sh paramA paramB "param C"] $optionalParam 

Это был явно подвержен ошибкам и многословно и многие Tclers склонны использовать ярлыки, как

set optionalParam "" 
if { somecondition } { 
    set optionalParam someValue 
} 
eval spawn foo.sh paramA paramB paramC $optionalParam 

Это не получилось бы «интересно» с "param C". Или, если у реального someValue есть пробел. (Попробуйте выяснить, почему для себя! Подумайте, что у вас есть бонусная точка, если вы можете сделать это, не используя интерпретатор Tcl, чтобы сделать это для вас.) Из-за этих проблем мы добавили синтаксис расширения в Tcl 8.5, который hugely легче получить право.

Answer 2

Существует несколько правильных способов сделать это. Лично я бы поставил все Params в список, а затем расширить список в конце:

set params {paramA paramB "param C"} 
if { somecondition } { 
    lappend params someValue 
} 
spawn foo.sh {*}$params 

Вы могли бы сделать то же самое с цепочкой, если вы предпочитаете.