$ perl -le " print qq[\033\035] " |od -tacx1 0000000 esc gs cr nl 033 035 \r \n 1b 1d 0d 0a 0000004