perl/tk のScrollbarについて
下のように縦にボタンを100個配置した場合、どのようにスクロールバーを設定するのですか?表現がまずいかもしれませんが、MainWindowの縦にスクロールバーを配置したいのですが、方法がわかりません。
--------------------------------------------------------
#!c:\perl\bin\perl.exe
use Tk;
$top = MainWindow->new();
#ボタン
$button_1 = $top->Button( -text => "ボタン1",-command => \&filemake ) ->grid();
$button_2 = $top->Button( -text => "ボタン2",-command => \&filemake ) ->grid();
$button_3 = $top->Button( -text => "ボタン3",-command => \&filemake ) ->grid();
$button_4 = $top->Button( -text => "ボタン4",-command => \&filemake ) ->grid();
$button_5 = $top->Button( -text => "ボタン5",-command => \&filemake ) ->grid();
$button_6 = $top->Button( -text => "ボタン6",-command => \&filemake ) ->grid();
.
.
.
$button_99 = $top->Button( -text => "ボタン99",-command => \&filemake ) ->grid();
$button_100 = $top->Button( -text => "ボタン100",-command => \&filemake ) ->grid();
MainLoop();
お礼
分かりにくい質問してすみません。なんとか解決できました。ありがとうございました。