/:/?$33=X[FS=_,OFS=".",z=(y=(x="0000")x)y,$0=/2/?(/c/?"dcba3210fedcba9876543210":/4/?"ba98"x 7654x 3210x:/f/?"faebdaed"z:y z)"8bd01002":1z z]"ip6.arpa":$0=X[a=FS=".",$0=$0]$4a$3a$2a$1a"in-addr.arpa"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).