eval {
  local $SIG{PIPE} = 'IGNORE';
  ...
};