Perl: the Markov chain saw | |
PerlMonks |
Re: Re: Re: The longest word ....by Anarion (Hermit) |
on Nov 12, 2002 at 12:54 UTC ( [id://212256]=note: print w/replies, xml ) | Need Help?? |
Another point of view without using sort:
Or clean the array every iteration too:
Update:(Changed "while" with "for" after testing) $anarion=\$anarion; s==q^QBY_^=,$_^=$[x7,print
In Section
Seekers of Perl Wisdom
|
|