Perl Tk : Displaying window in bottom right Corner

[pavunkumar]

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 I need to for achieve this thing. By default it displays in top left corner.

Thanks in Advance

[lamprecht]

Hi,

You can use the screenwidth and screenheight methods to get information about the screens geometry. Then use the geometry() method to place your main window.

see Tk::Widget for documentation.

Cheers, Christoph

[murugaperumal]

Use the following code

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

[stefbv]

On my screen, (1920x1080) your code will put a window almost on the center :)

Update: I guess your screen resolution is 1024x768 (or 1024x800).

Regards, Stefan