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 >