while(3tcl) while(3tcl) NAME while - while test body while test ( expr ) boolean body Tcl body test test boolean body Continue (iteration) body break while while : test while test () $x<10 : set x 0 while {$x<10} { puts "x is $x" incr x } boolean , , , while Copyright (C) 1993 The Regents of the University of California. Copyright (C) 1994-1997 Sun Microsystems, Inc. Copyright (C) 1995-1997 Roger E. Critchlow Jr. [] [] 2001/11/20 Linux man : http://cmpp.linuxforum.net man man https://github.com/man-pages-zh/manpages- zh while(3tcl)