if ($var ~~ [ 'a', 'b', ... ]) {
  ...
}

##</code><code>##

my @ok = ('a', 'b', ...);
if ($var ~~ @ok) {
  ...
}

##</code><code>##

my %ok = map { $_ => 1 } 'a', 'b', ...;
if ($ok{$var}) {
  ...
}