{
  local $SIG{__DIE__} = ...; 
}
## no sig handler here
doEval();

sub doEval {
   local $SIG{__DIE__} = ...;
   ...
} ## the end