my $count = 0;
until((@window3=FindWindowLike(undef,"calculator")) || ($count > 29))
{
   print("\ncan't find window\n");
   sleep 1;
   $count ++;
}