in reply to XS DESTROY not invoked

Do you have a link to your full source code?

Also, is $crl definitely a blessed reference in the expected package? (Check with Scalar::Util::blessed.)

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

In Section Seekers of Perl Wisdom