RosettaCodeData/Task/Dynamic-variable-names/Tcl/dynamic-variable-names-1.tcl
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

4 lines
119 B
Tcl

puts "Enter a variable name:"
gets stdin varname
set $varname 42
puts "I have set variable $varname to [set $varname]"