sub new {
    my $class = shift;
    local $value = shift;

    return bless { datum => $value, glob => *value }, $class
}