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