[REBOL] Re: Perl is to stupid to understand this 1 liner.
From: carl:cybercraft at: 16-Dec-2001 8:32
On 16-Dec-01, Petr Krenzelok wrote:
>>> rebol[]c: charset "0123456789" parse/all f: read %memo.txt[some
>>> [a: 1 2[3 c "-"]4 c b:(change/part a "####" b) | skip]]print f
>>>
>>
>> Very nice! I find it hard to imagine a shorter solution in REBOL.
>>
> eh, I can't read it right now - what does 1 2 [3 c "-"] 4 c is
> doing? :-)
Find 1 or 2 "000-"s followed by a "0000". The part of my code that
was working before I had to steal some of yours to make the rest of
it work. (:
--
Carl Read