use Switch;

switch ($foo) {
  case [$bar,$baz,$boo] { print "yep!\n" }
}