my $data;
do {
    #  Get web page
    my $response = $ua->post( $page, \%form );

    #  Check for errors
    if ($response->is_success) {
      $data = $response->content;
    } else {
      sleep 100;
    }
} until (defined($data));