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