Re: simple golf for fun
[email protected] ((Ton Hospel)) Tue, 16 Jan 2007 20:16:06 +0000 (UTC)
| Newsgroups | perl.golf |
|---|---|
| Organization | lunix confusion services |
| Message-ID | <[email protected]> |
In article <[email protected]>, Phil Carmody <[email protected]> writes: > In response to Phil Carmody <[email protected]> saying: >> > The simple version of the task is to verify that each line of a file is the >> > insertion of one character somewhere (maybe at the start or the end) into >> > the prior line. > > --- Ton Hospel <[email protected]> wrote: > <<< > > -p0 $_ x=/^((.*)(.*) > (?=\2.\3 >|$))*$/ > >>>> > > Nice indeed. But would this count as a -4 Magoo? > > -p0 s/^((.*)(.*) > (?=\2.\3 >|$))*$// > Absolutely