Como prueba para ver si existe un archivo en Perl

Originalmente diseñado como un lenguaje de script de Unix, Perl se ha convertido en un lenguaje de programación de propósito general que se utiliza en varias capacidades. Todavía se utiliza como un lenguaje de script de Unix y Linux por los administradores del sistema. Uno de los usos de la lengua puede ser para comprobar si existe un archivo y, o bien imprimir la respuesta a la pantalla o actuar sobre el resultado. El gestor de archivo "-e" se utiliza para comprobar la existencia del archivo.

Instrucciones

1 Abrir un documento en blanco en cualquier editor de texto.

2 Tipo "#! / Usr / bin / perl -w" en la primera línea del documento para iniciar el script de Perl.

3 Escriba el "$ archivo = 'archivo.txt" línea para crear la variable que contiene el nombre del archivo. Reemplazar "archivo.txt" con el nombre del archivo que desea probar.

4 Escriba la línea "si ($ archivo -e) {" para iniciar la instrucción if que comprueba el archivo.

5 Escriba la línea de "imprimir" Sí, existe el archivo! ";}" A la salida de la línea "Sí, existe el archivo!" a la pantalla, si existe el archivo.

6 Escriba la línea "else {print" No, no existe el archivo. ";)" Para imprimir la línea de "No, no existe el archivo." Si no existe el archivo.

7 Escriba la "salida"; line para cerrar el script de Perl.

8 Guarde el archivo como "file_exist.pl" y cierre el archivo.

9 Tipo "perl file_exist.pl" en un símbolo del sistema para ejecutar el script.