This just trims a few characters from your approach, which I think is a very good one (I couldn't find an inherently better one).
# 68 strokes perl -E'map{say$_=$t||1;$t="";$t.=(length$&).$1while/(.)\1*/g}0..19'
In reply to Re^2: What's the answer to this puzzle? Most unique/golfed solution? (fun)
by liverpole
in thread What's the answer to this puzzle? Most unique/golfed solution? (fun)
by blakew
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |