complicated variables

[empty84]

i have some variables :

var1, var2, var3, var4, var5, var6

and i want to "puts" all of this variables in "for" loop:

for {set i 1} {$i<=6} {incr i} {
?puts $var$i
?puts $[var$i]
?puts $"var$i"
}

how can i do that?

 

[feherke]

Hi

for {set i 1} {$i<=6} {incr i} {
  [red]eval "puts \$var$i"[/red]
}

Feherke.

http://rootshell.be/~feherke/

 

[feherke]

Hi

for {set i 1} {$i<=6} {incr i} {
  [red]put [set var$i][/red]
}

Feherke.

http://rootshell.be/~feherke/

 

[ulis]

If you're building names you probably need to use an array:

 array set var {1 one 2 two 3 three}
 set var(4) four
 foreach name [array names var] \
 { puts $var($name) }
 puts var(1)
 puts var(2)
 puts var(3)

More on array at

http://wiki.tcl.tk/array

HTH

ulis