![]() |
|
We don't bite newbies here... much | |
PerlMonks |
Re: a perl quiltby chipmunk (Parson) |
on Jan 31, 2001 at 09:44 UTC ( #55440=note: print w/replies, xml ) | Need Help?? |
Well, I can't resist a bit of golf.
@s=1..168;print+splice(@s,rand@s,1),@s%12?$":$/while@s
Although I would sacrifice a few strokes to get formatted output:
@s=1..168;printf'%3d%s',splice(@s,rand@s,1),@s%12?$":$/while@s
In Section
Meditations
|
|