8 lines
229 B
Tcl
8 lines
229 B
Tcl
set grandpa {$daddy}; set grandma \$mommy
|
|
set daddy myself; set mommy {lil' bro}
|
|
set fun1 \[string\ to
|
|
set fun2 lower
|
|
set lower middle
|
|
set middle upper
|
|
set fun3 {aNd]}
|
|
puts [subst "$grandpa $fun1$[subst $$fun2] $fun3 $grandma"]
|