Hex-escape sensitive tcl/shell characters
printf $(printf "\x26\x3b\x60\x27\x22\x7c\x2a\x3f\x7e\x3c\x3e\x5e\x28\x29\x5b\x5d\x7b\x7d\x24\x5c\n" | ./escape)
# &;`'"|*?~<>^()[]{}$\
Close ...
printf $(printf "\x26\x3b\x60\x27\x22\x7c\x2a\x3f\x7e\x3c\x3e\x5e\x28\x29\x5b\x5d\x7b\x7d\x24\x5c\n" | od -A n -t x1 | awk 'BEGIN {ORS=""}; { gsub(/ +/, "\\x"); print }')
&;`'"|*?~<>^()[]{}$\