All dogs go to heaven

[merlyn]

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

-- Randal L. Schwartz, Perl hacker

[japhy]

Won't that cause much infinite looping badness at the end of the program?

---

Update -- it tells me: "DESTROY created new reference to dead object during global destruction." And I don't see this message documented anywhere.

japhy -- Perl and Regex Hacker