Tcl IF语句中的多个THEN语句

Question

我正在使用Tcl脚本，如果if语句为true，则想要做两件事。代码如下：

if { $Start_day >= 1 && $Start_day <= 15} {set Meteo_file "edas.$Start_month2$Start_year.001"                                                                                                                                            
                                           set Meteo_file_back "edas.$Start_month2_back$Start_year_back.002"}

然而，我错了并得到了这个：

wrong # args: should be "set varName ?newValue?"
while executing
"set Meteo_file "edas.$Start_month2$Start_year.001" 
set Meteo_file_back "edas.$Start_month2_back$Start_year_back.002""

有没有任何方法（语法）让if语句在实现时做两件事？

Answer 1

将IMO放在不同的行上会更具可读性：

if {$Start_day >= 1 && $Start_day <= 15} {
    set Meteo_file "edas.$Start_month2$Start_year.001"
    set Meteo_file_back "edas.$Start_month2_back$Start_year_back.002"
}

我无法得到你的错误......以上对我来说很好。

作为旁注，您是否可以在同一条线上同时使用set？我不明白为什么第一个set右边会出现很多空格。