# Used to focus windows on the top
use Win32::GuiTest qw(FindWindowLike GetWindowText
    SetForegroundWindow SendKeys);

while ($found == 0)
{
 $found = FindWindowLike(0, 'Engineering Toolkit', "");
 sleep (4); 
 print "Application is still starting Wait .........\n";
}