Re: The Mr Magoo Awards (tpr05a)

[email protected] (Mtv Europe)
Newsgroups perl.golf
Message-ID <[email protected]>
Hello Adam!

[email protected] wrote:
> Despite not finding the above soln in time, I enjoyed my first round of
> golf 
> greatly, and will certinally be back, regex skills or not.  Regexs are not 
> always the answer though, despite what mtv may claim.  For example in the 
> minigolf thread "Son of (-ugene's Cantor" the shortest solution given was 
> Ton's
> -l $_=$"x2**pop;$_="$'/\\",print,s/(?<=\\)../$&^KI^D5/egwhile/^ /
> the following is, however, 4 strokes shorter :
> -l print$"x--$x,map$x&$_?$"x2:"/\\",0..$_-1for 1..($x=2**pop)

Hmm, indeed no way to insert regex here but this exception (second after
http://www.ardinternet.com/golf/oddnumbermagicsquare/ ) just confirms
the rule!    Anyway there _are_ ways to squeeze this unusual algorithm:

-l $x=2**pop;print$"x--$x,map$x&$_?$"x2:"/\\",0..$y++while$x

---
Mtv Europe
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.