This show how to size and position a Tk top level window. In the sample code the window is 100 x 200 pixels and is positioned 500 pixels from the left edge of the window and 10 pixels down from the top.

use warnings;
use strict;
use Tk;

my $main = MainWindow->new ();

$main->geometry('100x200+500+10');

MainLoop;
[download]