sub DESTROY {
    ... cleanup ...
    eval {
        $self->SUPER::DESTROY();
    };
};