$terminal->slave->clone_winsize_from(\*STDIN);

##</code><code>##

  unless (eval{$self->clone_winsize_from(\*STDIN);}) {
    my $winsize = pack('SSSS', 25, 80, 0, 0);  # rows, cols, #pixelsX, #pixelsY
    ioctl($self->slave(), &IO::Tty::Constant::TIOCSWINSZ, $winsize);
  }