#!/usr/bin/perl
use Win32::GuiTest;
Win32::GuiTest::MouseMoveAbsPix($x,$y);#move to absolute screen position
Win32::GuiTest::SendMouseMoveRel($x,$y);#move to relative position
exit;