Basic syntax for while command in tcl language is
while test body
Tcl also have break and continue command as found on other language to control looping. Break within body will exit the loop. Continue will stop executing body and reevaluate the test.
Consider below sample :