Ubuntu Word list Iteration

wordlist.rb

# Wordlist on most Ubuntu Installs

open '/usr/share/dict/american-english' do |list|
  until list.eof?
    word = list.gets.chomp
    next unless word.match /^[A-Za-z]+$/
    value = word.upcase.split(//).inject(1) do |sum,v|
      sum *= v.ord - 'A'.ord + 1
    end
    # puts "#{word} = #{value}"
    if value == 715
      puts word
    end
  end
end