$SIG{'INT'} = sub {
    if ( tied(%hash)->len ) {
        (MCE->wid == 0)
          ? say 'Parent is ready to dump'
          : say 'Worker is ready to dump';

        say 'Dumping: ' . Dumper \%hash;
        %hash = ();
    }
    MCE::Signal::stop_and_exit('INT');
};

$SIG{'TERM'} = sub {
    if (MCE->wid > 0) {
        # worker
        MCE->exit(0);
    } else {
        # parent
        say 'Parent is ready to dump';
        say 'Dumping: ' . Dumper \%hash;
        MCE::Signal::stop_and_exit('TERM');
    }
};