sub DESTROY {
  my $self = shift;
  if ($@) {
    local $@;
    return $self->DESTROY(@_);
  }