Help for this page

Select Code to Download

Select or download this

   foreach my $word (@words) {
      if (/\Q$word/) {  # BAD!! $word always changes.