{
  local $SIG{__DIE__};
  local $SIG{__WARN__};
  $ret = eval { someFunction() };
  warn $@ if $@;
}