problem reconstructing variable

[Thodd]

Hi,
I'm a newbie in Tcl. I want to return the value of node1 & node2 on screen by a for-loop. But I don't really know how to manage this...

set ns [new Simulator]

set node1 "ok1"
set node2 "ok2"
...
for {set i 1} {$i <= 1} {incr i} {
set clientnode "node"
append clientnode $i
puts $clientnode
}

$ns run

This returns "node1" instead of "ok1".
Thx in advance

 

[Bong]

This is a common mistake; at least, I made it often enough. You need to use eval to force the secondary substitution:

puts [eval "set $clientnode"]

_________________
Bob Rashkin

 

[Thodd]

Ok, thx!
I'll try your solution.

 

[Thodd]

Thx it works!
Now I've got another problem here:

set ns [new Simulator]
...
for {set i 1} {$i <= 1} {incr i} {
set agentname "udp"
append agentname [expr $i + 1]
set agentname [new Agent/UDP]
...
set agentnameb [expr append $agentname "b"]
puts $agentnameb
}

$ns run

it should then return udp2b instead of the value of that variable.
What went wrong?
Thx

 

[Bong]

set agentnameb $agentname;append agentnameb b

_________________
Bob Rashkin

 

[Thodd]

Ok, thx

 

[Bong]

By the way, expr is only used for evaluating mathematical expressions, as in:
set FofX [expr {$a*pow($x,2)}]

_________________
Bob Rashkin

 

[Thodd]

Exactly, but sometimes I'm still very confused by the tcl-syntax...

thx for noticing.