Thread::Cleanup::register {
pass 'pseudo-fork destructor called';
is $local_end, 1, 'pseudo-fork destructor called after local END block';
Thread::Cleanup::register {
pass 'pseudo-fork destructor called';
is $local_end, 1, 'pseudo-fork destructor called after local END block';