Re^2: Challenge: prefix($x, $y) . suffix($x, $z) eq $x

shmem,
What is "better"?

Bah, I was just baiting folks into contributing. I do see a syntax error in what you posted (last if block is missing closing curly)? After correcting that typo, it takes about 11 wallclock seconds to run the tennis name list. Thanks for your contribution :-)

Cheers - L~R

Comment on Re^2: Challenge: prefix($x, $y) . suffix($x, $z) eq $x

Replies are listed 'Best First'.
Re^3: Challenge: prefix($x, $y) . suffix($x, $z) eq $x by shmem (Chancellor) on Apr 22, 2009 at 22:27 UTC
I do see a syntax error Thanks, corrected. - I seem to just have learned something about index: use it! Did cut the wallclock time to the half it did... ;-) ... see my update.	[reply]
Re^4: Challenge: prefix($x, $y) . suffix($x, $z) eq $x by Limbic~Region (Chancellor) on Apr 22, 2009 at 22:35 UTC
shmem, This doesn't seem to scale very well. I started to run it against a 60K word dictionary file and I gave up waiting for it to produce output after a few minutes. Perhaps you could modify it to accept a target word from the command line and only do all matches if one isn't provided? Cheers - L~R	[reply]
Re^5: Challenge: prefix($x, $y) . suffix($x, $z) eq $x by shmem (Chancellor) on Apr 22, 2009 at 23:59 UTC
Limbic~Region, well, it was never meant to scale ;-) I've updated my post. Running it with 'ivanova' as argument now yields `real 0m0.067s user 0m0.051s sys 0m0.003s` [download] on average. --shmem	[reply] [d/l]
Re^6: Challenge: prefix($x, $y) . suffix($x, $z) eq $x by Limbic~Region (Chancellor) on Apr 23, 2009 at 00:23 UTC
Re^7: Challenge: prefix($x, $y) . suffix($x, $z) eq $x by shmem (Chancellor) on Apr 23, 2009 at 00:43 UTC
Some notes below your chosen depth have not been shown here