Come leggere più righe di un file in Perl

September 21

Il linguaggio di programmazione Perl è stato originariamente progettato per elaborare i report. Ha potenti funzioni di elaborazione di testo, comprese le linee di lettura da un file di testo. È possibile inserire ogni riga del file in un array, quindi elaborare un numero specifico di linee. La funzione "aperta" viene utilizzato per aprire il file. Il file può essere aperto in sola lettura, scrivere solo, aggiungere solo o una combinazione dei permessi. Dopo aver elaborato il file, è necessario utilizzare la funzione "Chiudi" per chiudere il file.

istruzione

1 Aprire un file vuoto in qualsiasi editor di testo.

2 Digitare la riga

! / Usr / bin / perl

per avviare lo script Perl.

3 Digitare la riga

il mio $ num = 10;

per creare la variabile che contiene il numero di linee che si desidera leggere.

4 Digitare la riga

il mio $ line_num = $ num-1;

per sottrarre uno (1) dal numero di linee che si desidera stampare. A tale scopo, perché una matrice comincia a contare da zero (0), non (1).

5 Digitare la riga

aprire il file, "<", "nomefile" o morire $ !;

per aprire il file che contiene le linee. Sostituire "nome file" con il nome del file che si desidera aprire. Il file verrà aperto in sola lettura.

6 Digitare la riga

i miei @linee = <file>;

posizionare il contenuto del file in un array. Ogni riga del file sarà un elemento separato nella matrice.

7 Digitare le righe

for ($ x = 0; $ x <= $ line_num; $ x ++)

{

@linee stampa [$ x];

}

per stampare il numero di righe impostato nella variabile "$ num". È possibile modificare il codice tra le parentesi graffe per qualsiasi elaborazione linea si preferisce.

8 Digitare la riga

vicino FILE;

per chiudere il file aperto.

9 Salvare il file come "read_lines.pl".

10 Digitare il comando "perl read_lines.pl" al prompt dei comandi per eseguire lo script.