Lea la variable de entorno Bash en TCL

Question

Cómo leer una variable de entorno de shell en su secuencia de comandos Tcl. Así que, por favor, por favor, ayúdenme. Soy muy nuevo en TCL.

Answer 1

Utilice $::env para acceder a cualquier variable de entorno, p. para acceder a la variable de entorno TMP hacer esto:

set tmpdir $::env(TMP) 

Más información aquí http://wiki.tcl.tk/1624

Answer 2

$ export var=42 
$ tclsh 
% puts $env(var) 
42 

Answer 3

Las variables de entorno son accesibles a través de una función de variable global env (completo es ::env). Usas esto como cualquier otra matriz Tcl.

Si desea imprimir una lista de todas las variables de entorno que puede usar algo como esto:

proc dump_env_vars {} { 
    foreach name [array names ::env] { 
     puts "$name == $::env($name)" 
    } 
} 

Por supuesto, para tener acceso a una sola variable que utiliza como cualquier otra matriz, por ejemplo:

puts "HOME = '$::env(HOME)'" 

Para más información ver la env page on the Tcler's wiki y the env section of the tclvars man page

Answer 4

para leer una variable de entorno shell script Tcl , Trata de hacer algo como esto:

global env 
set olddisplay $env(DISPLAY) 
set env(DISPLAY) unix:0 

Esto podría expresarse así de esta manera:

set olddisplay $::env(DISPLAY) 
set ::env(DISPLAY) unix:0 

y olvidarse de global.

Puede comprobar para ver si existe la variable haciendo algo como:

if {[info exists env(VARNAME)]} { 
    # okay, it's there, use it 
    set value $env(VARNAME) 
} else { 
    # the environment var isn't set, use a default 
    set value "the default value" 
} 

Esta es source.