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