...
    $textbox = $mw->Scrolled(
        'ROText',
        -font       => "{Courier New} 12 bold",
        -background => 'DarkBlue',
        -foreground => 'OldLace',
        -scrollbars => 'se',
        -wrap       => 'none',
        -height     => 8
    );
    my $adj  = $mw->Adjuster( -widget => $textbox, -side => 'bottom');
    $adj->pack( -side => 'top', -fill => 'x');
    $textbox->pack( -expand => 0, -fill => 'x', -anchor => 'n' );

    my $buttonFrame =
      $mw->Frame()->pack( -side => 'bottom', -fill => 'both', -expand => 0 );
...