~$ 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