Help for this page

Select Code to Download


  1. or download this
    my @matches = (
   $element =~ /(WEED)/,
...
if (@matches) {
   ...
}
  2. or download this
    if (my @matches = map { /(WEED)/, /(DIAL)/, /(PIES)/, /(KILLD)/ } $ele
+ment) {
   ...
}
  3. or download this
    if (my @matches = $element =~ /(WEED|DIAL|PIES|KILLD)/g) {
   ...
}