如何在 Tcl 中的单词之间提供动态变化 space？
How to give dynamic varying space between words in Tcl?
我是 tcl 的新手，我喜欢你帮助我在 Tcl 中给单词之间的动态可变间距。
示例："Stack over flow"
“堆栈”作为其中的 5 个字母。
所以我必须给出 space 的 5 来开始下一个单词，同样转到下一个单词。
Output: Stack over flow
我想你可以这样做：
set example "Stack over flow"
set result ""
foreach word $example {
append result $word [string repeat " " [string length $word]]
}
set result [string trim $result]
puts $result
将给予：
Stack over flow
我是 tcl 的新手，我喜欢你帮助我在 Tcl 中给单词之间的动态可变间距。 示例："Stack over flow" “堆栈”作为其中的 5 个字母。 所以我必须给出 space 的 5 来开始下一个单词，同样转到下一个单词。
Output: Stack over flow
我想你可以这样做：
set example "Stack over flow"
set result ""
foreach word $example {
append result $word [string repeat " " [string length $word]]
}
set result [string trim $result]
puts $result
将给予：
Stack over flow