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