Perl - Entrada / salida básica
Perl - entrada y salida estándar
Perl le permite escribir en la salida estándar, llamada STDOUT y leer la entrada estándar (STDIN). Estos dos descriptores son proporcionados por el sistema operativo, permite la lectura de la entrada del teclado y la visualización de los datos en la pantalla. De hecho, Perl se basa en sistemas UNIX, en los que las entradas y salidas se consideran archivos.
Por ejemplo, en un servidor web que utiliza scripts CGI, la entrada estándar es la solicitud HTTP y la salida estándar la respuesta HTTP.
Leyendo la entrada estándar
Los datos provenientes de la entrada estándar (definidos por el sistema operativo) están disponibles en el entorno Perl a través del descriptor. De esta manera, es posible recuperar (línea por línea) el contenido de este descriptor usando una variable específica y un operador de asignación:
$ var =
También es posible utilizar una variable de matriz en la que concatenaremos cada línea:
@var =
De esta manera, a través de un bucle, puede recuperar todas las líneas de la entrada estándar. Cuando no hay más líneas disponibles en la entrada estándar, devuelve el valor "undef", lo que significa que no se establece ningún valor y el bucle termina. Un ejemplo de un bucle:
while ($ var =) {// instrucciones} Escribiendo a stdout
Para escribir en la salida estándar solo use la función print ():
$ var = 'Hola'; imprimir ($ var. 'mundo');
Estas instrucciones tienen el efecto de enviar la cadena "Hello World" a la salida estándar. Aquí se utilizó el operador de concatenación (".") Para unir las dos cadenas. También es posible usar comillas dobles para interpolar la variable $ var, es decir, reemplazar su contenido:
$ var = 'hola'; imprimir ("$ var world"); Esta función también se puede utilizar en una sintaxis radicalmente diferente, haciendo más evidente el papel de la salida estándar (STDOUT):
$ var = 'Hola'; imprimir STDOUT $ var;
En realidad, siendo STDOUT la salida " estándar " (por defecto), la forma más fácil de escribir este código es:
$ var = 'bonjour'; imprimir $ var;
También es posible utilizar el printf () (desde el lenguaje C) para enviar información a la salida estándar.
La salida de error estándar.
Perl proporciona un tercer descriptor estándar para enviar automáticamente errores a una salida específica, según lo define el administrador del sistema. Este descriptor se llama STDERR .
Documento original publicado en CommentCaMarche.net.