~$ perl -E 'system $^X, "-E", "say for \@ARGV", 1, qq(\x27), 2' 1 ' 2 ~$ perl -E 'system $^X, "-E", "say for \@ARGV", 1, qq(\x22), 2' 1 " 2 #### >perl -E "system $^X, '-E', 'say for @ARGV', 1, qq(\x22), 2" 1 2 #### >perl -E "system $^X, '-E', 'say for @ARGV', 1, qq(\\\x22), 2" 1 " 2