[tk] grab main window position

[Larry]

Hi,

I am on the process of creating my first perl/tkx application. I was
wondering if there was a way to get the current window position on
screen...so that I could save and when the application is launched again
it'll position right there!

this is what I have coded so far:

#!/wperl

use strict;
use warnings;
use Tkx;
Tkx::package_require("BWidget");

my $mw = Tkx::widget->new(".");
$mw->g_wm_title('Hello World!');
$mw->g_wm_geometry("400x250-5+5");

Tkx::MainLoop();

__END__;

I guess there should be some sort of callback to actually notice when the
window changes position...

thanks