如何使用Perl Tkx设置固定窗口大小

我正在尝试使用perl创建GUI窗口。 但创建的GUI窗口大小在不同的系统中有所不同

有谁能告诉我，如何设置固定大小，使其不会改变取决于以下因素，
-我们在桌面上设置的任何分辨率
-我们使用的任何系统
-我们使用的任何操作系统

我在Perl中使用的代码片段：

use Tkx;
my $MainWindow = Tkx::widget -> new(".");
$MainWindow -> g_wm_geometry("600x15+340+612");

$MainFrame = $MainWindow -> new_ttk__frame();
$ExtractionTypeLabel = $MainFrame -> new_ttk__label(-text => <<TEXT>>,
-padding => 10,
);
$ExtractionTypeSingle = $MainFrame -> new_ttk__radiobutton(-text =>$ConfMainSingleExtractionText,
-variable => \$ExtractionTypeVal,
-value => $ConfMainSingleExtractionText,
-command => \&SINGLE_RADIO_BUTTON_LISTENER,
);
##### ALIGNMENT IN GRID LAYOUT #####
$ExtractionTypeLabel -> g_grid(-row => 3, -column => 0, -pady => 1);
$ExtractionTypeSingle -> g_grid(-row => 4, -column => 0, -ipadx => 4);
##### PACK #####
$MainFrame -> g_pack(-in => $MainWindow);
Tkx::MainLoop();
exit;

---

尝试设置特定的窗口大小

$MainWindow->configure（-width=>100，-height=>100）