Perl è un linguaggio di programmazione che può essere utilizzato come una granata o Web linguaggio di scripting di uso generale. Usare Perl per trovare le righe duplicate a qualsiasi file di testo e li stampa sullo schermo, o a un altro file. La variabile di hash Perl viene utilizzata per contenere i dati dell'elenco. Qualche tempo ciclo analizza il file e calcola il numero di volte che la linea è trovata nel file.

Istruzioni

1

Aprire un file di testo vuoto. Digitare le righe seguenti per avviare lo script Perl:

! / usr/bin/perl

uso rigoroso;
utilizzare gli avvisi;

2

Immettere la seguente riga per creare la variabile che contiene il nome del file:

mio $file = 'nomefile';

Sostituire "nomefile. txt" con il nome del file in cui si desidera eseguire la ricerca di duplicati.

3

Digitare la riga seguente per creare l'hash per contenere le righe del file:

la mia linea %;

4

Inserire questa riga per aprire il file per la lettura:

locale @ARGV = ($file);

5

Avviare while loop che leggerà attraverso ogni riga del file:

mentre (<>) {

6

Stampare le righe duplicate sullo schermo con la seguente riga:

Se stampa $line {$_} + +;}

7

Salvare e chiudere il file.