my @choices = [qw/one two three four/];
my $me = $mw->MatchEntry(-choices => @choices);

##</code><code>##

my @choices = (qw/one two three four/);
my $me = $mw->MatchEntry(-choices => \@choices);

##</code><code>##

my $choices = [qw/one two three four/];
my $me = $mw->MatchEntry(-choices => \@$choices);