use Win32::GuiTest qw(FindWindowLike SetForegroundWindow SendKeys);

while (FindWindowLike(0, "^Elixir Transformation Suite","",0,1)) {
	my @windows = FindWindowLike(0, "^Key Message","",0,1);
	for (@windows) {
		SetForegroundWindow($_);
		SendKeys("{ENTER}");
		sleep(1);
		}
	sleep(5);	
	}