perl -wMstrict -e "my $s = qq(abcdX\befg);   print $s"
abcdefg
perl -wMstrict -e "my $s = qq(abcdX \befg);  print $s"
abcdXefg
perl -wMstrict -e "my $s = q(abcdX\befg);    print $s"
abcdX\befg
perl -wMstrict -e "my $s = q(abcdX \befg);   print $s"
abcdX \befg