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

##</code><code>##

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

##</code><code>##

perl -E "say for @ARGV" 1 \" 2
1
"
2

##</code><code>##

perl -E "say for @ARGV" 1 " 2
1
 2