$<.bytes{|a|'[({'[putc''.<<a!=???a:$*.pop]&&$*<<a%2-~a}