# assign to hash
$self->{hash}->{foo} = 'bar';

# get keys from hash
keys %{$self->{hash}};

# tie hash
tie %{$self->{hash}}, "AnyDBM_File", "data", O_RDWR, 0644;