my $result;
{ my $value = '';
  $result = \$value;
}
$$result .= 'text';