home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Practical Programming in Tcl & Tk (4th Edition)
/
TCLBOOK4.BIN
/
mac
/
exsource.old
/
1_16.tcl
< prev
next >
Wrap
Text File
|
2003-04-15
|
180b
|
17 lines
#
# Example 1-16
# Embedded variable references.
#
set foo filename
set object $foo.o
#=> filename.o
set a AAA
set b abc${a}def
#=> abcAAAdef
set .o yuk!
set x ${.o}y
#=> yuk!y