module - TCL:如何检查环境变量是否已设置

Question

我正在尝试构建一个模块文件，我想包含一个 if 语句来检查是否已经设置了某些环境变量(例如 PATH、LD_LIBRAY_PATH、PYTHON_PATH、...)。

我尝试了几种不同的语法选项(在此处搜索，官方文档和其他论坛之后)，但是当我尝试时:

module use modulefiles
module load mymodule

我不断收到 ERROR:102: Tcl command execution failed错误。以下是我尝试过的一些选项:

一世)

set myTools /path/to/my/Tools
if { info exists $LD_LIBRARY_PATH } {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTool/lib64:$LD_LIBRARY_PATH
} else {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTools/lib64
}

ii)

set myTools /path/to/my/Tools
if { [info exists $LD_LIBRARY_PATH] } {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTool/lib64:$LD_LIBRARY_PATH
} else {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTools/lib64
}

iii)

set myTools /path/to/my/Tools
if { $?LD_LIBRARY_PATH } {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTool/lib64:$LD_LIBRARY_PATH
} else {
    setenv LD_LIBRARY_PATH $myTools/lib:$myTools/lib64
}

检查可能已经设置的环境变量是否存在的正确语法是什么，例如在 .cshrc或 .login文件？

抱歉，如果这是一个基本问题。我以前在 shell(主要是 csh)中做过这样的事情，但我是 TCL 和构建模块文件的新手，所以非常感谢任何帮助和建议!

谢谢!

Answer 1

http://wiki.tcl.tk/1624 about env 可能包含您问题的答案。

按照其他答案中给出的提示和上面给出的 wiki 链接，我构建了以下适用于我的代码。

if { [info exists ::env(IDL_PATH)] } {
   if {![string match *<IDL_DEFAULT>* $::env(IDL_PATH)]} {
   puts stderr "Warning: ill defined IDL_PATH environment variable
   }
} else {
setenv  IDL_PATH        "<IDL_DEFAULT>"
}