Come verificare se esiste un file in Perl

Come verificare se esiste un file in Perl

Originariamente progettato come linguaggio di scripting Unix, Perl si è evoluto in un linguaggio di programmazione generico utilizzato in varie capacità. È ancora utilizzato come linguaggio di scripting Unix e Linux dagli amministratori di sistema. Uno degli usi del linguaggio può essere quello di verificare se esiste un file e stampare la risposta sullo schermo o agire sul risultato. L’opzione del descrittore di file “-e” viene utilizzata per verificare l’esistenza del file. Istruzioni
1

Apri un documento vuoto in un editor di testo.
2

genere “#! / Usr / bin / perl- w ”sulla prima riga del documento per avviare lo script Perl.
3 tipi di

la riga “$ file = ‘file.txt” per creare la variabile che contiene il nome del file. Sostituisci “file.txt” con il nome del file che desideri testare.
4 Tipo di

la riga “if (-e $ file) {” per avviare l’istruzione if che controlla il file. file
5

digita la riga “stampa” Sì, il file esiste! “;}” Per uscire dalla riga “Sì, c’è un file! ”Sul schermo, se il file esiste.
6

digita la riga “else {print” No, il file non esiste. “;)” Per stampare la riga “No, il file non esiste. ”Se il file non esiste
7 Tipo di

la riga “uscita; ”. . per chiudere lo script Perl
8

Salva il file come “file_exist.pl” e chiudi il file.
9

Digita “perl file_exist.pl” al prompt dei comandi per eseguire lo script.