if (grep { $x == $_ } ( 1, 3, 7 ) {
  # do this
}