my $c = $mw->Scrolled('Canvas',
-width => 500,
-height => 500,
-background =>'blue',
-scrollregion => [ 0, 0, 200, 200 ]
);