Perl er et generelt programmeringsspråk som kan brukes som et skall eller web skriptspråk. Bruk Perl å finne dupliserte linjer i en tekst -fil og skrive dem til skjermen, eller til en annen fil . Perl hash variabelen brukes til å inneholde liste data . En stund løkke analyserer filen og teller hvor mange ganger linjen er funnet i filen. Instruksjoner
en

Åpne en tom vanlig tekstfil . Skriv inn følgende linjer for å starte Perl script : en

# /usr /bin /perluse streng , bruke advarsler ;
2

inn denne linjen for å opprette variabelen som inneholder filen ! navn: .

my $ file = ' filnavn.txt ';

Erstatt " filnavn.txt " med navnet på filen der du vil søke etter duplikater


3

Skriv inn følgende for å opprette den hash å inneholde linjene i filen : en

min % linjer;
4

Sett inn denne linjen for å åpne filen for lesing : en

lokale @ ARGV = ( $ fil) ;
5

Start mens loop som vil lese gjennom hver linje av filen:

while ( < > ) {
6

ut de dupliserte linjer til skjermen med denne linjen : en

print hvis $ linjen { $ _ } + +; }
side 7

Lagre og lukk filen .