$ie->{agent}->Document->readyState !~ /complete/i){ sleep(0.5); }