#!perl -p
s#.#!printf"%04b",$&+3#eg