Select Code to Download

use Win32::API;

...
                              $r->{Bottom} - $r->{Top};

use Win32::API;
use Win32::API::Callback;
...
  );

EnumDisplayMonitors ( 0x0, 0x0, $MonitorEnumProc, 0x0  );