请教前辈一下，如何在TCL脚本中，嵌套调用perl

windows下的脚本

tcl 脚本位于d:/temp/000.tcl：set a 100

puts $a

perl 脚本： $a= system "d:/temp/000.tcl"

print $a

要注意格式！！ 1.去掉两个分号 2.if [ $b -lt 10 ] if 与[ 之间要有空格 [ $b -lt 10 ] [ ] 其中的字符两侧需留有空格 3.elif [ $bU

---