in reply to scanning a text file and deleting lines that are double

Paragraph mode, and unique check (untested): 
$/ = "";
while (<IN>) {
   my %seen;
   print OUT grep !$seen{$_}++, split /^/m, $_;
}

[download]

Replies are listed 'Best First'.
Re^2: scanning a text file and deleting lines that are double
by tachyon (Chancellor) on Sep 03, 2004 at 07:58 UTC

    Very snazzy.

[reply]

In Section Seekers of Perl Wisdom