Hvordan Les flere linjer med en fil i Perl
Perl programmeringsspråk ble opprinnelig utviklet for å behandle rapporter. Den har kraftige tekstbehandlingsfunksjoner, herunder lese linjer fra en tekstfil. Du kan plassere hver linje i filen til en matrise, deretter behandle et bestemt antall linjer. Den "åpne" funksjonen brukes til å åpne filen. Filen kan åpnes som skrivebeskyttet, skrive bare, føyer bare eller en kombinasjon av tillatelser. Etter behandlingen av filen, bør du bruke "close" -funksjonen for å lukke filen.
Bruksanvisning
1 Åpne en tom fil i en tekst editor.
2 Skriv inn linjen
! / Usr / bin / perl
å starte Perl-skript.
3 Skriv inn linjen
min $ num = 10;
for å skape den variabelen som inneholder antall linjer du ønsker å lese.
4 Skriv inn linjen
min $ line_num = $ num-1;
å trekke en (1) fra antall linjer du ønsker å skrive ut. Du gjør dette fordi en rekke begynner å telle fra null (0), ikke (1).
5 Skriv inn linjen
Åpne fil "<", "filnavn" eller dø $ !;
å åpne filen som inneholder linjene. Erstatt "filnavn" med navnet på filen du vil åpne. Filen vil bli åpnet som skrivebeskyttet.
6 Skriv inn linjen
mine @lines = <file>;
å plassere innholdet av filen i en matrise. Hver linje i filen vil være et separat element i matrisen.
7 Skriv linjene
for ($ x = 0; $ x <= $ line_num; $ x ++)
{
print @lines [$ x];
}
å skrive ut antall linjer du setter i "$ num" variable. Du kan endre koden mellom klammeparentes til en linje behandling du foretrekker.
8 Skriv inn linjen
Lukk fil;
for å lukke den åpne filen.
9 Lagre filen som "read_lines.pl".
10 Skriv inn kommandoen "perl read_lines.pl" ved ledeteksten for å utføre skriptet.