my $z = eval 'qq{' . $y . '}';