my @message = Win32::GUI->GetMessage(); print "MESSAGE: " . join(",",@message[0..3]) . "\n\n";