Help for this page

Select Code to Download


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