Help for this page
package DESTROY::EVAL_ERROR::NOT; ... *{$pkg}= sub { local $@; $orig->(@_) }; } }
use Broken::Package; use DESTROY::EVAL_ERROR::NOT qw( Broken::Package ); ...