$SIG{PIPE} = sub { exit; }

##</code><code>##

$SIG{PIPE} = \&cleanup;