$SIG{PIPE} = sub{
   # write the fucking file
};