in reply to Deleting duplicate lines from file

Sure: 
perl -ne 'print if !$saw{$_}++'
perl -pe'$s{$_}++and$_=$,'

[download]

Replies are listed 'Best First'.
Re^2: Deleting duplicate lines from file
by turo (Friar) on Feb 18, 2006 at 12:51 UTC

    I like this minimalistic bit of code :-) ... You win! 

    perl -pe'$_{$_}++and$_=$,'

    [download]

    perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"'
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom