Come test per vedere se esiste un file in Perl

September 7

Originariamente concepito come un linguaggio di scripting Unix, Perl è diventato un linguaggio di programmazione di uso generale utilizzato a vario titolo. E 'ancora utilizzato come Unix e Linux linguaggio di scripting da parte degli amministratori di sistema. Uno degli usi della lingua può essere quello di verificare se un file esiste e né stampare la risposta allo schermo o agire sul risultato. Il filehandle "-e" viene utilizzato per verificare l'esistenza del file.

istruzione

1 Aprire un documento vuoto in qualsiasi editor di testo.

2 Digitare "#! / Usr / bin / perl -w" sulla prima riga del documento per avviare lo script Perl.

3 Digitare il "$ file = 'file.txt" linea per creare la variabile che contiene il nome del file. Sostituire "file.txt" con il nome del file che si desidera verificare.

4 Digitare la riga "if (file $ -e) {" per avviare il if che controlla per il file.

5 Digitare la "stampa" Sì, esiste il file linea! ";}" Per l'uscita della linea "Sì, il file esiste!" allo schermo, se il file esiste.

6 Digitare la riga "else {print" No, il file non esiste. ";)" Per stampare la linea "No, il file non esiste." Se il file non esiste.

7 Digitare il "uscita;" linea per chiudere lo script Perl.

8 Salvare il file come "file_exist.pl" e chiudere il file.

9 Tipo "perl file_exist.pl" al prompt dei comandi per eseguire lo script.