if (grep $_ eq $bar, @foo) {
   ...
}