sub threads::shared::FETCH {
    lock $Some:Global:lock_var;
    return $Some::Shared::Space::hash{$_[0]};
}

my %hash;
tie %hash, 'threads::shared';
...