#!/usr/bin/perl use strict; use warnings; use Win32::GuiTest qw(MouseMoveAbsPix SendMouse); # The position of the log out button on the Juno ad bar on my setup MouseMoveAbsPix(770, 15); SendMouse("{LEFTCLICK}"); # Give the confirmation box a chance to open sleep(2); # The position of the log out button on the confirmation window on my setup MouseMoveAbsPix(405,405); SendMouse("{LEFTCLICK}");