我正在学习Tcl。在Perl中,我可以这样做:
$ perl -e 'for ($i = 0; $i < 5; $i++) { printf("name%03d\n", $i) }'
name000
name001
name002
name003
name004
我可以在Tcl中执行此操作吗?
答案 0 :(得分:28)
请参阅format:
$ tclsh
% for {set i 0} {$i < 5} {incr i} { puts [format "name%03d" $i] }
name000
name001
name002
name003
name004