How can I display a Perl/Tk window in the bottom righthand corner?

I have planned开发者_运维百科 to do the chatting the exercise Perl socket. In this I want to display the require window using Perl/Tk. Here my requirement is that the window has to display in the bottom right corner. It is like Gmail Chat window. What do I need to achieve this? By default it displays in top left corner.

Use the following code

use strict;
use warnings;
use Tk;
# Main Window
my $mw = MainWindow->new;
$mw->geometry('+793+475');  # Slightly down to the right
MainLoop;

Tk::Wm->geometry