http://www.perlmonks.org?node_id=191212


in reply to regexp question

{ local $" = "|"; $line =~ /@{[map {quotemeta} @query]}/; }

Replies are listed 'Best First'.
Re: Re: regexp question
by kidd (Curate) on Aug 19, 2002 at 16:08 UTC
    Thanks...it worked grrreat... :-)

    Just one more thing...how could I check that all the words in the array are in the line?

    Thanks

      By not being smart and wanting it in a single regexp. Use your foreach loop and a counter. Increment the counter for each match found, and compare after the loop whether the counter equals the size of the array. Or just bail out whenever there isn't a match, depending a bit on what exactly you want to do.

      Abigail

        Yupi!!!

        I did it...thanks for your help...