In your specific case, maybe a hash would work (there's almost always a better answer than symbolic references):

my $result = "all";

my %button = (
  all  => "notselected",
  none => "notselected",
);

print "$button{$result}\n";

$button{none} = "selected";

$result = "none";

print "$button{$result}\n";
[download]