Re: Coffee time quiz

I invite the good golfers come back to this with an output requirement like:

answer
anothe
goldie
379 tested, 3 found
[download]

Update: output the words, a count of those words, and a count of words of the required length.

Seeing how the logic and readability changes, or not, would would be interesting.

Comment on Re: Coffee time quiz Download Code

Replies are listed 'Best First'.
Re: Re: Coffee time quiz by BrowserUk (Patriarch) on Oct 23, 2002 at 02:12 UTC
Building on ChemBoy's and sauoq's brilliant work... 'scuse the double quotes. `E:\Perl\lib>perl -pe "END{print qq($. tested, $Â£ found)};$_ x=(leng +th==16&&!/(.).\1/)and$Â£++" <words.txt Admiralty House Bishop Auckland blasting powder cloth-measuring cloth-spreading dermatoglyphics ditch sunflower wheat-producing 633293 tested, 8 found E:\Perl\lib>` [download] And yes, I know my words list has some stupid "words" in it:^) Cor! Like yer ring! ... HALO* dammit! ... 'Ave it yer way! Hal-lo, Mister la-de-da. ... Like yer ring!	[reply] [d/l]

Replies are listed 'Best First'.

Re: Re: Coffee time quiz
by BrowserUk (Patriarch) on Oct 23, 2002 at 02:12 UTC

Building on ChemBoy's and sauoq's brilliant work...

'scuse the double quotes.

E:\Perl\lib>perl -pe "END{print qq($. tested, $Â£ found)};$_ x=(leng
+th==16&&!/(.).*\1/)and$Â£++" <words.txt
Admiralty House
Bishop Auckland
blasting powder
cloth-measuring
cloth-spreading
dermatoglyphics
ditch sunflower
wheat-producing
633293 tested, 8 found
E:\Perl\lib>
[download]

And yes, I know my words list has some stupid "words" in it:^)

Cor! Like yer ring! ... HALO dammit! ... 'Ave it yer way! Hal-lo, Mister la-de-da. ... Like yer ring!

[reply]
[d/l]