sub Dog::DESTROY { push @::HEAVEN, shift }