如何从tcl脚本运行csh脚本？

Question

我试图从tcl脚本运行csh脚本.

下面的tcl脚本调用csh脚本

#!/usr/bin/tclsh


set scripts_path /scratch/TCL_scripts/scripts_adders

set synthesis /scratch/TCL_scripts/synthesis.csh


set files [glob -directory $scripts_path *]
split $files
set files [lsort $files]
set i 1

foreach script $files {

     puts "hello"
     # puts [pwd]
     exec /bin/csh -c $synthesis
     puts $i

}

并且(开头)csh文件如下:

#!/bin/csh -f


echo abcdefgh

当我只从我的unix终端执行csh文件时,它工作正常.当我调用我的Tcl脚本时,它运行并且确实写入"hello"并打印i,但csh文件未执行,因为"abcdefgh"从未出现在终端中.我也尝试过其他命令,我总是遇到同样的问题:当我从Tcl脚本运行它时,csh脚本永远不会被执行,即使它直接从终端运行它运行正常.

(我的Tcl脚本和csh脚本都是可执行的)

为了从我的Tcl脚本运行我的csh脚本,我该怎么办？

非常感谢你

Answer 1

确实为你运行了csh脚本,但是默认情况下它的标准输出成为Tcl 命令的结果exec(如果它在标准错误上产生任何东西,那将成为错误结果exec).要使输出和错误出现在终端上,您必须修改exec如下:

exec /bin/csh -c $synthesis >@stdout 2>@stderr

的>@说,"重定向标准输出到随后的信道"(stdout在这种情况下),并且2>@不为标准误差是相同的.