My parsimonious friend tye above has hit the nail on the head, but you may still be wondering what's going on. Let me expand a bit.

Perl reclaims memory in two distinct ways. First, it maintains a reference count, meaning it knows how many ways there are in the current program to refer to a given object. When the reference count goes to zero, the memory can be reclaimed.

With this style, the problem outlined in your code sample won't happen. The instance of Special::Object won't be reclaimed as long as the instance of the containing class refers to it via $self->{_obj} (as long as the parent instance is around and nobody tampers with encapsulation).

When a thread ends (or a single-threaded Perl exits), the so-called "global destruction" phase tries to reclaim memory allocated in that thread by traversing everything allocated in that thread. That's the stage at which your problem is happening. Now, the section on Two-Phased Garbage Collection states:

Objects are destructed in a separate pass before ordinary refs just to prevent object destructors from using refs that have been themselves destructed.
But as you've found, that doesn't solve the whole problem.

At this point, your main option is algorithm changes. One way, as tye is suggesting, is to not make objects global. Another possibility is to remove inter-object dependencies as far as destruction is concerned (may be difficult depending on the rest of your code).

HTH

Update: Egads! I have to learn to type faster.

In reply to Re: How can I call other objects from my object during DESTROY by VSarkiss
in thread How can I call other objects from my object during DESTROY by amackey

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.