my $result;
$$result = 'test -';