SPUG: Re: Anagram finder in perl
Aaron W. West
tallpeak at hotmail.com
Tue Nov 30 14:18:49 CST 2004
Ha!
Oops!
So much for not releasing the source of the C program.
----- Original Message -----
From: Aaron W. West
To: spug-list at mail.pm.org
Sent: Tuesday, November 30, 2004 12:17 PM
Subject: Anagram finder in perl
Scrabble/Literati players:
This is a fun tool to find 7 & 8 letter words. It can find smaller ones, but
you need to enter the letters. I wrote a more powerful one in C, but don't
feel like releasing the source.
Note that this implementation is slow for more than about two blanks, due to
trying every combination for those blanks, in the line below:
for my $wild ( 'a' x $wildcount .. 'z' x $wildcount ) {
Just imagine 'aaaa' to 'zzzz' ... I think I pressed control-C the time I
tried four blanks.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: anagram.pl
Type: application/x-perl
Size: 3169 bytes
Desc: not available
Url : http://mail.pm.org/archives/spug-list/attachments/20041130/295ee2f2/anagram.bin
More information about the spug-list
mailing list