>perl -MShellQuote::Any::Tiny=shell_quote -E "system $^X, '-E', 'say for @ARGV; <STDIN>', 1, shell_quote(qq(\x5c \x5c)), 2"
1
\\ \
2