my $t = $mw->Scrolled('Text')->pack(-fill => 'both', -expand => 1); $t->insert('end', 'mein Text');