my $result = '';
$result = \$result;
$$result .= 'text';