rebol - 到达行时文件停止读取

Question

在找到包含字符串“start”的行后，我有下面的代码开始读取文件的其余部分

   foreach line clines [
      if find [%start] line [
      print line
     ]
   ]

我无法从文档中弄清楚..这里发生了什么？对我来说似乎合乎逻辑。

Answer 1

在搜索文件内容之前，您必须先阅读文件。

也许你正在寻找类似的东西

clines: read/lines %myfile
found: false
foreach line clines [
    if any [
        found 
        found:  find line "start"
    ]  [
        print line
    ]
]

另一种方式是

cfile: read %myfile
print all [
    cfile: find cfile "start"
    find/tail cfile lf
]