$SIG{'WINCH'} = sub {
    kill WINCH => $EXP -> pid if $EXP -> pid;
};