Select Code to Download

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