sub g { ($n=pop)--?[map("0$_",@l=@{g($n)}),map"1$_",reverse@l]:[''] } [download]
MeowChow s aamecha.s a..a\u$&owag.print
In reply to (MeowChow) Re: (Golf) Grey code by MeowChow in thread (Golf) Grey code by Everlasting God