BEGIN {
    $tied = tie %hash, 'IPC::Shareable', {
        key => 'test',
        create => 1,
# make explicit to destroy:
	destroy => 'yes',
    };
}