Re: patch full of dark magic

On Aug 9, 2010, at 8:21 AM, Cosimo Streppone wrote:

>>    package Foo;
>>    sub DESTROY { exit; }
>>    my $foo = bless {}, 'Foo';
> 
> I couldn't try this yet, but, I don't think this
> would segfault.
> 
> What I *guess* happens is that the 'exit' will cause
> the script to immediately exit, skipping the nasty
> part that would otherwise segfault.

Which nasty part?

>> Oops. Try "unless" to "if" in this bit, please:
>> 
>>            fail 'Child should be inactive on DESTROY'
>>                if $self->FETCH('Active');
> 
> Will try and let you know.

Thanks!

David