Getting cursor position withour canvas

kean has asked for the wisdom of the Perl Monks concerning the following question:

I know how to retrieve the cursor position in a canvas. But how can i get the position without a canvas in a Tk MainWindow??

Comment on Getting cursor position withour canvas

Replies are listed 'Best First'.
Re: Getting cursor position withour canvas by Anonymous Monk on Feb 27, 2012 at 11:27 UTC
ddg://tk mouse position -> http://rosettacode.org/wiki/Mouse_position ddg://site:perlmonks.org tk mouse position -> ~~Getting correct cursor position from scrolled Tk.pm canvas~~ :) Mimicking UNIX Eyes `perl -MTk -le " tkinit->bind(q/<Motion>/, sub { print $Tk::event->X; }); MainLoop; "`	[reply] [d/l]
Re: Getting cursor position withour canvas by webmind (Acolyte) on Feb 27, 2012 at 12:14 UTC
`use X11::GUITest qw/GetMousePos/; my ($x, $y, $scr_num) = GetMousePos();` [download] Should work.	[reply] [d/l]