perl -pe'$_= pack "C*", /\d+/g'