From: William James <w_a_x_man@...>
Date: 2008-02-16T15:29:55+09:00
Subject: Re: My Boggle Solver: I welcome any tips and tricks!

On Feb 16, 12:17 am, William James <w_a_x_...@yahoo.com> wrote:
> On Feb 15, 11:34 pm, Stedwick <philip.broc...@gmail.com> wrote:
>
> > $words = {}
> > $stems = {}
> > File.open("enable.txt","r").each do |line|
> >   word = line.chomp
> >   $words[word] = true
>
> >   0.upto(word.size-2) do |i|
> >     $stems[word[0..i]] = true
> >   end
> > end
>
> IO.foreach("enable.txt"){|word|
>   word.strip!
>   $words[word] = true
>   (0...word.size).each{|i|
>     $stems[ word[0,i] ] = true
>   }}

Shorter:

IO.foreach("data"){|word|
  $words[ word.strip! ] = true
  (0...word.size).each{|i|
    $stems[ word[0,i] ] = true
  }
}