文件读取,写入和附加在TCL

Question

在TCL中,如何使用for循环或foreach循环将不同的内容附加到单个文件中？

Answer 1

你的意思是那样的吗？

set fo [open file a]
foreach different_content {"text 1" "text two" "something else" "some content"} {
  puts $fo $different_content
}
close $fo

您file以模式a(追加)打开文件并写入文件描述符($fo在示例中).

更新:如果要附加变量内容,则必须将脚本更改为:

set fo [open file a]
foreach different_content [list $data1 $data2 $data3 $data4] {
  puts $fo $different_content
}
close $fo