In article <[EMAIL PROTECTED]>,
Stefan `Sec` Zehl <[EMAIL PROTECTED]> writes:
> and, afaics the winning one:
>
> -n /(.)((??{chr 1+ord$+})){3}/&&print
Oh, I missed that one in the archives. Neat.
>
> which can (with todays golf knowledge) be shortened to:
>
> -p $_ x=/(.)((??{chr 1+ord$+})){3}/
>
> The other variant:
>
> -p $_ x=/(.)((??{++($p=$+)})){3}/
>
> does not work, and I'm not sure why, because
>
> -p $_ x=/(.)((??{++($p=$+)x1})){3}/
>
> does again work :)
You can make it work like this:
-p $_ x=/(.)((??{++($0=$+)})){3}/
But it has the problem of false positives again, it matches xyzaa
