Re: A new golf "Reversi" has started
[email protected] (Ton Hospel) Sat, 22 Nov 2003 15:22:55 +0000 (UTC)
| Newsgroups | gmane.comp.lang.perl.golf |
|---|---|
| Organization | lunix confusion services |
| Message-ID | <[email protected]> |
In article <[email protected]>, "Riley" <[email protected]> writes: > Hello, All! > > I believe I understand ton's alternative solution... > > -p0 s/\.(?=.{$&}(x.{$&})+o)/*/sgwhile$_=reverse,998877e3=~/./g > > (At first I was confused as to why 998877e3 was needed > as opposed to 998877e2, but I suppose since ton is > reversing the string in the while condition, rather > than in the while block, he needed one more character > in order to flip the string one final time. Is there > any other purpose for having e3?) If you put the reverse in the body and use e2, you need an extra space after the while and it becomes a 63 stroke solution.