如何將整數轉換爲Tcl中前導零的字符串？

Question

我正在學習Tcl。在Perl中，我可以這樣做：

$ perl -e 'for ($i = 0; $i < 5; $i++) { printf("name%03d\n", $i) }' 
name000 
name001 
name002 
name003 
name004 

我可以在Tcl中做到這一點嗎？

Answer 1

見format：

$ tclsh 
% for {set i 0} {$i < 5} {incr i} { puts [format "name%03d" $i] } 
name000 
name001 
name002 
name003 
name004