Tk::CursorControl is a Perl module that allows you to manipulate the mouse cursor programmatically.
SYNOPSIS
use Tk::CursorControl;
$cursor = $main->CursorControl;
# Lock the mouse cursor to $widget
$cursor->confine($widget);
# Free the cursor
$cursor->release;
# cursor disappears over $widget
$cursor->hide($widget);
# show cursor again over $widget
$cursor->show($widget);
# warp cursor to $widget (jump)
$cursor->warpto($widget);
# move cursor to $widget
$cursor->moveto($widget);
Product's homepage
Requirements:
· Perl