Aprire un file vuoto in qualsiasi editor di testo .
2
Tipo linea
# ! /Usr /bin /perl
.
per avviare lo script Perl
3
Tipo linea
my $ num = 10;
per creare la variabile che contiene il . numero di righe che si desidera leggere
4
Tipo linea
mio line_num $ = $ num - 1;
per sottrarre uno (1 ) dalla numero di righe che si desidera stampare . A tale scopo, perché un array inizia a contare da zero (0 ) , non ( 1) .
5
Tipo linea
file aperto, " < " , " nome " o morire $ ; !
per aprire il file che contiene le linee . Sostituire "nomefile " con il nome del file che si desidera aprire. Il file verrà aperto in sola lettura
6
Tipo linea
mio @ righe = Di mettere il contenuto del file in un array. Ogni riga del file sarà un elemento distinto della matrice Digitare le righe for ( $ x = 0; . $ X < = $ line_num ; $ x + + ) per { print @ linee [ $ x ] ; } per stampare il numero di righe impostato nel " $ num" variabile . È possibile modificare il codice tra le parentesi graffe per qualsiasi elaborazione linea si preferisce Tipo linea vicino FILE ; . Per chiudere il file aperto. Salvare il file come " read_lines.pl " . Digitare il comando " perl read_lines.pl " al prompt dei comandi per eseguire lo script .
7
8
9
10
Informazioni correlate
Programmazione © www.354353.com