How can I avoid an error: No such environment variable?

tcl
user782642 picture user782642 · Oct 10, 2011 · Viewed 11.9k times · Source

In my code I am using environment variables, but if it (env.var) doesn't exist, I get the error message NAME_ENV_VAR: no such variable, and my script stops executing. For example, in the line

 myeval $env($File)

I receive an error:

 can't read "env(NIKE_TECH_DIR)": no such variable
    while executing
"myeval $env($File)"
    (procedure "chooseRelevantFiles" line 39)
    invoked from within
"chooseRelevantFiles $::GlobalVars::reqStage"
(file "/vobs/tavor/src/Scripts/ReproduceBug.tcl" line 575)

How can I avoid this error and go on to execute my script?

Answer

Colin Macleod picture Colin Macleod · Oct 10, 2011

You could test with info exists and use a default if the environment variable is not set, eg.

if {[info exists env($File)]} {
    set filename $env($File)
} else {
    set filename /some/default/path
}
myeval $filename

Related questions

How to make a GUI for bash scripts?

I want to make some graphical dialogs for my script but don't know how. I hear something about GTK-Server or something like that. If someone knows how to link Bash with tcl/tk I also be satisfied. Please do not …

Read More
Waiting for background processes to finish before exiting script

How do I make sure that all my background processes have finished execution before I exit my script (TCL/Bash). I was thinking of writing all my background process pids to a pidfile. And then at the end pgrep the …

Read More
TCL remove an element from a list

How te remove an element from TCL list say: which has index = 4 which has value = "aa" I have Googled and have not found any built-in function yet.

Read More