my @words_and_stems= (\@words , $stemmed_words);