如何在tcl中使config.txt文件正确可读

Question

我在config.txt文件中有一个交换机配置。我已将此文件打开到tcl，set fd [open config.txt r]和o {p puts $fd，

switchport
switchport access vlan 333
switchport mode access
switchport port-security
switchport port-security maximum 5

现在我想将这个o / p解析为另一个名为newconfig.txt的文件，它应该如下所示，

switchport

switchport access vlan 333

switchport mode access

switchport port-security

switchport port-security maximum 5

任何人都可以告诉我如何这个，因为这个文件非常大，我想让它更具可读性。

提前致谢

Answer 1

我认为替代方式可能是：

set in    [open config.txt]
set out   [open newconfig.txt w]
set data  [read $in]
puts $out [join [split $data "\n"] "\n\n"]
close $in
close $out

这不会在文件的最后一行添加额外的新行：）