Rexx - Líneas

Esta función devuelve el valor 1 o el número de líneas que quedan por leer en un flujo de entrada. El nombre del archivo se proporciona como entrada a la función.

Sintaxis

lines(filename)

Parámetros

• filename - Este es el nombre del archivo.

Valor devuelto

Esta función devuelve el valor 1 o el número de líneas que quedan por leer en un flujo de entrada.

Ejemplo

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

En el programa anterior, se deben tener en cuenta las siguientes cosas.

• La función de líneas lee el archivo Example.txt.

• La función while se utiliza para comprobar si existen más líneas en el archivo Example.txt.

• Para cada línea leída del archivo, la variable line_str contiene el valor de la línea actual. Esto luego se envía a la consola como salida.

Output - Cuando ejecutamos el programa anterior, obtendremos el siguiente resultado.

Example1 
Example2 
Example3

Hay otra variación del comando de líneas que es la siguiente:

Sintaxis

lines(filename,C)

Parámetros

• filename - Este es el nombre del archivo.

• C- Este es un valor constante proporcionado a la función. Este valor que especifica el número de líneas que quedan para leer del archivo.

Valor devuelto

El valor de retorno es el recuento de líneas que quedan por leer del archivo.

Ejemplo

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

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

Cuando ejecutamos el programa anterior obtendremos el siguiente resultado.

Salida

3 
Example1 
2