my %hash1; @hash1{qw/shave the modern way/}= (); #### ++$hash{$the_word_just_read}; #### $hash{$the_word_just_read}= undef; # or 1 or ''