Re: A new golf "Mayan number converter " has started

I was really proud of the following solution because the problem is taken
care of
in a single regex:

-p 1while s#\d*[-.:|]+ ?#$*+=20**y/ //*(5*$&=~y/|//+2*$&=~y/://+$&=~/\./)#e
The problem is that I have to use all those bloody $&=~...

Is there anyway to simplify this with a (?{...}) block in the pattern match
by
somehow setting $_=$&? I tried doing this, but weird things started
happening.

-Riley
(o0lit3)