use Tk::TextEdit;
....
$text = $f2->Scrolled('TextEdit',-scrollbars=>'se',....);
$text->SetGUICallbacks([sub {}]);  #prevents warnings
.........