RE: Matching at least $x words out of @words

safer:

$x <= grep { $string =~ quotemeta } @words

Greg

-----Original Message-----
From: Iain Loasby [mailto:[email protected]] 
Sent: Thursday, May 05, 2005 3:39 PM
To: José Castro; [email protected]
Subject: RE: Matching at least $x words out of @words



> -----Original Message-----
> From: José Castro [mailto:[email protected]] 
> Sent: 05 May 2005 15:24
> 
> [snip]
> Isn't there a neater (and probably twisted, of course) way of saying
> /match at least $x of the words in @words/ 

 $x <= grep { $string =~ m/$_/ } @words


http://www.bbc.co.uk/

This e-mail (and any attachments) is confidential and may contain
personal views which are not the views of the BBC unless specifically
stated.
If you have received it in error, please delete it from your system. 
Do not use, copy or disclose the information in any way nor act in
reliance on it and notify the sender immediately. Please note that the
BBC monitors e-mails sent or received. 
Further communication will signify your consent to this.



------------------------------------------------------------------------------
This message is intended only for the personal and confidential use of the designated recipient(s) named above.  If you are not the intended recipient of this message you are hereby notified that any review, dissemination, distribution or copying of this message is strictly prohibited.  This communication is for information purposes only and should not be regarded as an offer to sell or as a solicitation of an offer to buy any financial product, an official confirmation of any transaction, or as an official statement of Lehman Brothers.  Email transmission cannot be guaranteed to be secure or error-free.  Therefore, we do not represent that this information is complete or accurate and it should not be relied upon as such.  All information is subject to change without notice.