my %ahash = (
   key1 => 1,
   key2 => 2
);
bless \%ahash, 'FOO';