my %hash = ( b1 => 3, c2 => 7 );
my $h = \%hash;