A linguagem de programação Perl foi originalmente concebido para processar relatórios. Tem funções de processamento de texto poderosas, incluindo a leitura de linhas de um arquivo texto . Você pode colocar cada linha do arquivo em uma matriz, em seguida, processar um número específico de linhas. A função " aberto " é usado para abrir o arquivo. O arquivo pode ser aberto como somente leitura , escrever apenas , acrescentar apenas, ou qualquer combinação de permissões. Depois de processar o arquivo, você deve usar a função " perto" de fechar o arquivo. Instruções 
 1 
 Abra um arquivo em branco em qualquer editor de texto . 
 2 
 Digite a linha 
 
 # /usr /bin /perl 
 
 para iniciar o script Perl 
 3 
 Digite a linha 
 
 my $ num = 10; . 
 
 para criar a variável que contém o . número de linhas que você quer ler 
 4 
 Digite a linha 
 
 my $ line_num = $ num -1 ; 
 
 para subtrair um (1 ) a partir da número de linhas que você deseja imprimir. Você pode fazer isso porque uma matriz começa a contar a partir de zero ( 0), não (1). 
 5 
 Digite a linha 
 
 aberto FILE, "<", "nome do arquivo " ou morrer $ ; 
 
 para abrir o arquivo que contém as linhas. Substitua " filename" com o nome do arquivo que você deseja abrir. O arquivo será aberto como somente leitura 
 6 
 Digite a linha 
 
 my @ linhas =  ; . 
  Para colocar o conteúdo do arquivo em uma matriz. Cada linha do arquivo será um elemento separado na matriz 
 7 
 Digite as linhas 
 
 for ($ x = 0; . $ X < = $ line_num ; $ x + + ) 
 
 { 
 
 print @ linhas [ $ x ]; } 
 
 
 
 para imprimir o número de linhas definidas na variável " $ num " . Você pode alterar o código entre as chaves para qualquer processamento linha de sua preferência 
 8 
 Digite a linha 
 
 próximo arquivo; . 
 
 Para fechar o arquivo aberto. 
 9 
 Salve o arquivo como " read_lines.pl " . 
 10 
 Digite o comando " perl read_lines.pl " em um prompt de comando para executar o script. < br >