$SIG{__DIE__} = sub {
      local $Text::Hidden::Force = "hidden";
      # ...
  };