use strict;
    use Tk;
    my $mw = MainWindow->new;   
    my $t = $mw->Scrolled('Text',-scrollbars => 'se', -wrap=>'none')->pack;
        #Works
    $t->Subwidget('text')->configure(-bg => 'grey');
        #Does not work
    $t->Subwidget('yscrollbar')->configure(-width =>24);
    MainLoop;