expect - 如何从期望的变量中获取主目录？

Question

我想将主目录设置为变量。

我怎样才能做到这一点？

这是我的代码：

set fp [open "$HOME/temp.sh" r]
set data [read $fp]
close $fp
set ::logfile [open "$HOME/log.sh" a]

Answer 1

由于 Expect 是 Tcl 的扩展，因此您使用 Tcl 的env数组：

set fp [open "$::env(HOME)/temp.sh" r]
set data [read $fp]
close $fp
set ::logfile [open "$::env(HOME)/log.sh" a]

请参阅http://tcl.tk/man/tcl8.5/TclCmd/tclvars.htm和Tcl 教程。