This one is rejected. it fails on this test. 1111X1b121X!1X11b1X1b1X2b1X!1122111X
Terje K > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of Jasper McCrea > Sent: Monday, July 01, 2002 12:43 PM > Cc: Perl Golf > Subject: Re: mini golf > > > Chris Dolan wrote: > > > > my 45: > > > > #!perl -p > > y/!b/ > > /;s#\d+.#$&x map{(1)x$_}$&=~/./g#eg > > #!perl -pl > y/!/ > /;s/(\d*)(.)/($2eq b?$":$2)x$1/eg > > I believe this was my 42 > > Jasper >