my $regex = join '|', map "\Q$_\E", @vals; doSomething() if $data =~ $regex;