Select Code to Download

use strict;
use Win32::GuiTest qw(FindWindowLike GetChildWindows GetWindowText
...
   PostMessage($status, WM_LBUTTONDOWN, 0x0001, $xy);
   PostMessage($status, WM_LBUTTONUP, 0, $xy);
}

use strict;
use Win32::CtrlGUI;
...
   sprintf("0x%lx",$win->handle),"\n";
$win->post_message('NN', "WM_LBUTTONDOWN", 0x0001, $xy);
$win->post_message('NN', "WM_LBUTTONUP", 0, $xy);

003000BE R WM_ACTIVATE
003000BE P WM_LBUTTONDOWN fwKeys:MK_LBUTTON xPos:30 yPos:14
...
003000BE P message:0x118 [Unknown] wParam:0000FFF8 lParam:A00885B9
003000BE S WM_NCACTIVATE fActive:False
003000BE R WM_NCACTIVATE fDeactivateOK:True