Tcl字符串双引号

Question

我在tcl脚本中编写了这段代码

set setting "-D key=value "
append setting "-D key2=value2"

catch {exec icv -vue $setting -c $cell_name -i $gds_file $::RULE_SET } err
puts "error == $err"

上面这行执行.........

icv -vue "-D key=value -D key2=value2" -c top -i /re/xyz/abc.gds /re/xyz/ab.rs

我想从输出命令中删除双引号....？ 我想要这样的输出................

icv -vue -D key=value -D key2=value2 -c top -i /re/xyz/abc.gds /re/xyz/ab.rs

Answer 1

如果您使用的是Tcl8.5或更高版本，则可以将扩展运算符{*}作为参数

catch {exec icv -vue {*}$setting -c $cell_name -i $gds_file $::RULE_SET } err

如果您使用的是Tcl8.4或更低版本，则可以使用eval命令

catch {eval exec icv -vue $setting -c $cell_name -i $gds_file $::RULE_SET } err