#!/usr/bin/perl
use Win32::GuiTest qw(FindWindowLike GetWindowText 
    SetForegroundWindow SendKeys);

print "Hello World\n";
print "xxxxxxxxxxxxxxxxxxxxx\n";
SendKeys("ABC")