doSomething() if grep $data =~ /\Q$_/, @vals;