my $t = $mw->Scrolled("Text", -scrollbars => 'e')->pack
      (-side => 'bottom', -fill => 'both', -expand => 1);