Rexx - 线路

---

此函数返回值 1 或输入流中剩余要读取的行数。文件名作为函数的输入给出。

句法

lines(filename)  

参数

• filename - 这是文件的名称。

返回值

此函数返回值 1 或输入流中剩余要读取的行数。

例子

/* Main program */ 
do while lines(Example.txt) > 0 
   line_str = linein(Example.txt) 
   say line_str 
end  

在上述程序中，需要注意以下事项。

• lines 函数读取Example.txt 文件。

• while 函数用于检查Example.txt 文件中是否存在其他行。

• 对于从文件中读取的每一行，line_str 变量保存当前行的值。然后将其作为输出发送到控制台。

输出- 当我们运行上面的程序时，我们将得到以下结果。

Example1 
Example2 
Example3

lines 命令还有另一种变体，如下所示 -

句法

lines(filename,C)

参数

• filename - 这是文件的名称。

• C - 这是提供给函数的常量值。该值指定要从文件中读取的剩余行数。

返回值

返回值是剩余要从文件中读取的行数。

例子

/* Main program */ 
count = lines(Example.txt,C) 
say count 
line_str = linein(Example.txt) 

say line_str 
count = lines(Example.txt,C) 
say count 

当我们运行上面的程序时，我们将得到以下结果。

输出

3 
Example1 
2