if (grep /^$x$/, @array){
   ...
}