Help for this page
my $x = 'foo'; my $y = 'The answer is $x'; ... sub enquote { return 'qq{' . shift() . '}'; }
my $z = eval 'qq{' . $y . '}';
my $z = eval "qq{$y}";