Select Code to Download

use strict;
use warnings;
...
my $test = qq(a (b c d);

print $test;

Can't find string terminator ")" anywhere before EOF at math1.pl line 
+4.