use Win32::GuiTest qw(SendMouseMoveRel); while (1) { SendMouseMoveRel(0,0); sleep 1; }