Como prueba para ver si existe un archivo en Perl

Originalmente diseñado como un lenguaje de secuencias de comandos 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 Unix y Linux, lenguaje de scripting por los administradores del sistema. Uno de los usos de la lengua se puede comprobar si existe un archivo y, o bien imprimir la respuesta de la pantalla o actuar en consecuencia . La " -e " gestor de archivo se utiliza para comprobar la existencia del archivo . Instrucciones
1

Abra 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 Perl.
3

Escriba la línea " $ file = ' archivo.txt " 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 " if ( -e $ file ) { " para iniciar la instrucción if que comprueba la . archivo
5

Tipo de la línea "print" Sí , existe el archivo "; }" para la salida de la línea de " Sí , existe el archivo ! " a la pantalla , si el archivo existe .
6

Tipo de la línea "else {print " No, no existe el archivo. ";) " para imprimir la línea " No, el archivo no se existir " . si el archivo no existe
7

Escriba el "exit ; " línea . . para cerrar la secuencia de comandos Perl
8

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

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