my %hash = (a => 1, b => 2); my $href = \%hash; say %hash++; # prints 1 say $href; # prints 2