my $wait = 300;
#until ( $IEWin->{Busy} != 1 || $wait <= 0 )
#{
#    $wait--;
#    sleep 1;
#}