2013-12-02 19:46:31 -08:00

7 lines
104 B
Perl

foreach $_ (sort <> )
{
next if( defined( $prevline ) && $_ eq $prevline );
$prevline = $_;
print;
}