Tcl：[文件tempdir]

Question

不知何故在tcl 8.6

• file tempdir -失踪了
• file tempfile -存在

问:为什么没有tempdir？

Answer 1

不存在file tempdir，因为没有足够迫切的需要对其进行编码，而临时文件则要紧迫得多(而且更难正确，特别是在整个操作系统中)。您可以始终使用tcllib和Tcl，因为它们处于相同的许可证之下；Tcl脚本包的库提供了一个具有以下命令的丝状醇包：

set dirname [fileutil::maketempdir]

应该足够了。(有很多选项可以满足大多数需求。)

Answer 2

不依赖fileutil的模式：

proc ::util::tempdir {template} {
    close [file tempfile path $template]
    file delete $path
    file mkdir $path
    return $path
}

Answer 3

我所做的：

set workdir [exec mktemp -d]

注意:这取决于外部二进制mktemp。我认为这应该适用于任何UNIX-y。