I don't have an example handy right now, but often the Tk::Pane widget comes in handy when you need to add scrollbars. Just dump a scrolled Pane into the window.

my $pane = $mw->Scrolled('Pane', Name => 'scroll test',
               -width => 600,
               -height => 400,
               -scrollbars => 'osoe',
               -sticky => 'ne',
              );
$pane->pack;
[download]