Re: Small golfing trick

[email protected] (Eirik Berg Hanssen) Fri, 31 Mar 2006 16:09:12 +0200
Newsgroups perl.golf
Organization Du Allverden AS
Message-ID <[email protected]>
[email protected] (Philippe 'BooK' Bruhat) writes:

> Compare the classic "remove duplicate lines" one-liner
>
>     perl -ne'$s{$_}++||print' file
>
> with
>
>     perl -ne'$$_++||print' file
>
> Three characters in one shot!

  It has its limitations though.  Like namespaces:

~$ perl -e 'print"a\n::a\nmain::a\n::main::a\n"; ' | perl -ne'$$_++||print'
a
~$ 

  ... and missing newlines:

~$ perl -e 'print"a\n1"; ' | perl -ne'$$_++||print'
a
Modification of a read-only value attempted at -e line 1, <> line 2.
~$ 


Eirik
-- 
For every complex problem, there is a solution that is simple, neat, and wrong.
                -- H. L. Mencken
A good plan today is better than a perfect plan tomorrow.
                -- Patton