tcl写小写转换函数

以下是使用TCL编写的将字符串转换为小写的函数：

proc toLowerCase {str} {
    return [string tolower $str]
}

在此函数中，`proc` 声明了一个TCL过程，名称为 `toLowerCase`，它需要一个字符串参数 `str`。`string tolower` 命令用于将字符串转换为小写形式，并将结果作为函数的返回值。

要使用这个函数，只需调用 `toLowerCase` 并传入要转换的字符串作为参数。例如：

set myString "Hello, World!"
set lowerString [toLowerCase $myString]

在上面的示例中，`$myString` 包含字符串 "Hello, World!"，`[toLowerCase $myString]` 返回 "hello, world!"，并将结果存储在 `$lowerString` 中。