Think about Loose Coupling | |
PerlMonks |
Re: (Golf) Let's go bowlingby nardo (Friar) |
on Aug 08, 2001 at 21:58 UTC ( [id://103137]=note: print w/replies, xml ) | Need Help?? |
Doing it with substitutions 223 chars not counting the unnecessary whitespace for the body of the function. It's not the lowest bytecount here, but at least it's lower than my bowling highscore. Update: This fixes a bug pointed out by dragonchild 10 chars added. And another correction: s!\d,/,(\d)(\b)!10+$1.",$1$2"!eg; should be while(s!\d,/,(\d)(\b)!10+$1.",$1$2"!eg){} for multiple spare frames in a row to work.
In Section
Meditations
|
|