Oh, and don't construct instances of a class in the class's destructor

He did not do that, did he?

In the crash case OP presented that is exactly what he did:

package foo;  ... $f=Foo->new(); sub DESTROY {Foo->new()}
[download]

supplies a Foo destructor that creates a new Foo instance. Note that the new destructor replaces the original destructor. It would have been clearer (and the OP may have figured things out for himself) if OP had supplied a stand alone sample script that demonstrated the issue.