$<.bytes{|b|putc b+b/48*$.-=1--~b%3}