my %stopwords = map { $_ => undef } @stopwords;
$/=" ";
while(<>){
  chomp;
  push @lessWords, $_ unless exists $stopwords{$_};
}