sub DESTROY {
  local $@;
  ...
}