$hash{$key} = ...;

++$hash{$key};

for ($hash{$key}) { ... }

\$hash{$key}

some_sub($hash{$key})   # Exception!! See footnote.

##</code><code>##

$ perl -e'my %h;  1 for       $h{k};  CORE::say 0+keys(%h)'
1

$ perl -e'my %h;  1 for $x // $h{k};  CORE::say 0+keys(%h)'
0