Come eliminare un file in Perl

January 13

A seconda della natura del programma PERL può essere necessario per eliminare i file su disco. Ad esempio, se un file vuoto viene creato all'inizio di un programma ed è quindi scritto, può essere soppresso in modo che il programma funzioni correttamente. Questo tipo di gestione dei file è comune in alcuni programmi di indicizzazione. Uno di questi casi è quando un file il cui nome non cambia mai deve stampare materiale dinamico con ogni esecuzione del programma. In questo articolo si vedrà come eliminare un file con la creazione di uno script che crea un file di testo e poi lo elimina.

istruzione

L'eliminazione di un file in PERL

1 Verificare la presenza di PERL sul computer. Al c: \ tipo "perl -v" (senza virgolette) e premere "Invio". Se c'è una versione di Perl installato, vedrete un testo che ti dice quale versione avete. Se vedete questo testo, passare al punto 3. In caso contrario, passare alla fase 2.

2 Scarica PERL al computer. È possibile farlo andando a www.activestate.com e seguendo le istruzioni per il download PERL. Una volta che Perl ha installato, Fase 1 di nuovo.

3 Scarica l'editor di testo contesto. È possibile farlo andando a www.contexteditor.org. Questo è un buon editor per la programmazione in diverse lingue.

4 Scrivere codice che crea un file txt. Nel editor di testo digitare la seguente

aperto (FL, "> file.txt");
stampare FL "Ciao a tutti";

Questo bit di codice crea un file txt denominato "file.txt" e quindi stampa le parole "Ciao là" nel file. Se si esegue il file e quindi controllare il contenuto del file di testo, vedrete le parole "Ciao a tutti" stampati.

Salvare il file come "delete.pl"

5 Scrivere un codice che elimina il file. Questo bit di codice elimina "file.txt" utilizzando il comando "Scollega". Quindi il programma stampa un messaggio che la delezione è stata effettuata.

scollegare "file.txt";
print "Il file è stato eliminato";

6 Creare il programma completo. Per fare questo, aggiungere il contenuto al punto 5 a quelli al punto 4. Il programma dovrebbe essere simile al seguente:

aperto (FL, "> file.txt");
stampare FL "Ciao a tutti";
scollegare "file.txt";
print "Il file è stato eliminato";

Consigli e avvertenze

  • PERL scarica molto facilmente. Potrebbero essere necessari circa 10 minuti, ma non c'è bisogno di fare nulla di speciale.
  • Assicurati di non accidentalmente scollegare un file che si need.Make sicuri di mettere sempre il ';' dopo statementsNever capitalizzare il command.Notice 'di stampa' che il 'FL' è solo un handle di file che ho creato. Può essere tutto quello che vuoi, purché sia ​​in maiuscolo, ad esempio, 'my_file'