Select Code to Download

my $textbox = $mw->Text( 
    -wrap => 'word',
...
sub initialize {
    $textbox->insert("1.0", $long_text);
}

    -wrap => 'none' .... Don't do any wrapping at all
    -wrap => 'char' .... Wrap between characters
    -wrap => 'word' .... Wrap between words