Jak przekonwertować liczbę całkowitą na ciąg z zerami wiodącymi w Tcl?

Question

Uczę się Tcl. W Perlu mogę to zrobić:

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

Czy mogę to zrobić w Tcl?

Answer 1

Zobacz format:

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