in reply to Are two lines in the text file equal
my %hash; while ( my $line = <DATA> ) { print "Found another duplicate of: \"", $line, "\" in line $.\n" if ++$hash{$line} > 1; }
That will tell you if the file contains duplicate lines.
On the other hand, if you have a particular line in mind, and want to know if it is repeated elsewhere, you pretty much just scan through the file looking for a duplicate. No shortcut there.
Dave
|
|---|