hi am yasin , how can mark a limit piont of this perl while loop

[G+_yasin yusuf]

hi am yasin , how can mark a limit piont of this perl  while loop 

 

while($max <= 10) {

 

print $wordlist $words -> randpattern("CCccnCcn"),"\n";

 

}

[G+_Craig Shepp]

I see you are using a while..wend condition. As we already can see it has a built-in stop counter. But by using another conditioner inside you can check for some specify and do something special. I have not looked up the code for a breakout for perl but often you can do an action inside an if and then afterwards break out either by a break command of sorts or forcing the counter to its end condition.

[G+_yasin yusuf]

Oh thanks , but I already overcome that problem ,I made incrementing the max and setup an if loop with in the while loop

[G+_Craig Shepp]

Cool. Try not to loop too much. Can cause the code to run slower each.

[G+_yasin yusuf]

OK thanks