perl -E "$,='|'; say  $^X, '-E', 'say for @ARGV', 1, qq(\\\x22), 2"
C:\Perl\bin\perl.exe|-E|say for @ARGV|1|\"|2