#!/usr/bin/perl use strict; use Win32; use Win32::GUI;