if ( exists $Black_List{$candidate_word} ){
     # complain, bail, or whatever ...
   }