Select Code to Download

my %h = (a => 5, b => 9);
my $ref = \%h;
...
print "\$not_ref->{a}=$not_ref->{a}\n";

print "Even though $ref == $not_ref\n";

print "Even though $ref looks like $not_ref\n";