Dynamic variable names

Dynamic variable names
You are encouraged to solve this task according to the task description, using any language you may know.

Create a variable with a user defined name.

AutoHotkey

<lang AutoHotkey> inputbox, dynamic, variable name %dynamic% = hello ListVars msgbox % %dynamic%  ; says hello </lang>

Common Lisp

<lang lisp>

(defmacro set-string (string value) 
 `(setf 
   ,(read-from-string string) 
   ,value))
(set-string "dynamicA" "hello")

(print dynamicA) </lang>

Tcl

<lang Tcl>puts "Enter a variable name:" gets stdin varname set $varname 0</lang>