perl -pe 's/(\W)/"(".ord($1).")"/eg' foo.bin