my $b = {EARL.(HARRIS) => 55 };