如何计算 TCL 中长字符串中的字符数？

Question

我试过了，但它不计算空格。 我需要将输入文本限制为 255 个字符。

put text_length [string length $additional_information]

我想计算输入的字符数，包括空格和回车，并将字符数保存在 text_length 中（带空格和回车）。

把 text_length [字符串长度 $additional_information]

Answer 1

尝试这个。

set additional_information "   abc
"
set text_length [string length [string range $additional_information 0 254]]
puts $text_length
# outputs 7

它最多返回 255。