@word_list{@words}=1;
@sorted = sort keys %word_list;