tcl脚本逐行遍历的问题

时常在坑爹 · 发表于 2021-8-17 20:32:27

您需要登录才可以下载或查看，没有账号？注册

x

我在写一个tcl脚本时用while{（gets $nop3 line3）>=0}来实现读取每一行的内容，但是在满足一次条件后，nop3已经遍历到最后一行，当再次满足if条件时，nop3如何返回第一行再次开始遍历

kangkang005 · 发表于 2021-8-24 11:12:12

seek $nop3 0 ；#返回到第一行

有关seek语法：http://www.tcl-lang.org/man/tcl8.6/TclCmd/seek.htm

kangkang005 · 发表于 2021-8-24 11:18:14

seek $nop3 0 ；#返回到第一行

有关seek语法：http://www.tcl-lang.org/man/tcl8.6/TclCmd/seek.htm

[求助] tcl脚本逐行遍历的问题