wm title . "Hello, World!"
wm geometry . "640x480"
label .label -text "Hello, Tcl/Tk World!" 
pack .label -side top -anchor w