$logwin = $framename->Scrolled('Text', -height=>10, -width=>50, -scrollbars=>'e')->pack(-side=>'top', -padx=>4, -expand=>1);