tcl按行读取文件内容

在TCL中，可以使用`gets`命令按行读取文件内容。具体操作步骤如下：
1. 打开文件：使用`open`命令打开文件，例如：`set file [open "filename" r]`，其中`filename`为文件名，`r`表示只读模式。
2. 读取文件：使用`gets`命令按行读取文件内容，例如：`gets $file line`，其中`line`为读取到的一行内容。
3. 处理文件内容：对读取到的每一行内容进行处理，例如输出或者存储到变量中。
4. 关闭文件：使用`close`命令关闭文件，例如：`close $file`。

注意：在使用`gets`命令读取文件内容时，需要使用循环语句，例如`while`循环，来读取文件的每一行内容。