Re: Collaborative golf.
[email protected] (Mtv Europe)
| Newsgroups | perl.golf |
|---|---|
| Message-ID | <[email protected]> |
Hello World! > down to 132 :) and 126: printf "#!perl -l\neval lc pack u,'%s'\n", unpack u, uc <<'`' mm;print$m,0,401+$_-/-/*69for(($==(15-(0^.52+.32*($0=0^.01*($ m=pop)))+$m%19*19+($0*=3/4))%30)-=(1,$m%19/11-20)[29-$=])-(-$ 0+$=+2+int$m*5/4)%7-4# ` --- Mtv Europe