my %stopwords = map { $_ => 1 }
             qw(a i at be do to or is not no the 
               that they then these them who where
               why can find on an of and it by             
             );