sub add_stopwords {
    my @words= @_;
    for my $word (@words) {