Select Code to Download

use Data::Dumper;

...

print Dumper(\%hash);# print 2
print $hash{key};# also print 2.

int a[200];

a[100] = 2;