$SIG{'WINCH'} = sub {
    if (!$CONNECTED) {
        return 1;
    }
    while (! $EXP -> slave) {
        select(undef, undef, undef, 0.25);
    };
    $EXP -> slave -> clone_winsize_from(\*STDIN);
    kill WINCH => $EXP -> pid if $EXP -> pid;
};