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


in reply to Re: Regex Matching
in thread Regex Matching

but the thought lives on (edited to correct some rendering deficiencies)...

"Hi Monks,
"I'm in the process of writing a script that generates 8 Random Characters and the user has to make words from these characters. Each character can only be used once. For example, if the random sequence is FOTBIEIW and the user enters FOOT it will show an error message "No match". If the sequence was FOTBOIEW then FOOT would be acceptable.
"To generate the random letters im using:"

my @letter=('A'..'Z'); @rand=''; foreach(0..7){ $rand.=$letter[rand(@letter)];
</code>

"Then I get the user to enter a word split it into an array.

"This is where I get stuck."

for($count=0; $count<= ($wordLength - 1); $count++){ if($wordArray[$count] =~ /[$rand]/o{

Courtesy of Corion's good works (+ +), we have our own, local 'sorta go a ways back' machine.

Replies are listed 'Best First'.
Re^3: Regex Matching
by Kenosis (Priest) on Dec 05, 2012 at 21:54 UTC

    "Once the chalkboard has been erased, it can't be unerased..."