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