push @sorted_words, $HashA{$_};