This module provides function returning the equivalent of :
${^GLOBAL_PHASE} eq 'DESTRUCT' for older perls.