my $self1 = {};
%{ $self1->{hash} } = ();
print "$self1->{hash}\n";
%{ $self1->{hash} } = ();
print "$self1->{hash}\n";
#Output:
HASH(0x504f80)
HASH(0x504f80)

##</code><code>##

my $self2;
$self2->{hash} = {};
print "$self2->{hash}\n";
$self2->{hash} = {};
print "$self2->{hash}\n";
#Output:
HASH(0x622bb0)
HASH(0x504160)