$/=\1;print pack C,7+7*ord for<>