$m->submit();
my $content;
my $state;
+ my $sleep;
VALID_LOOP: {
do {
$state = $m->clone;
$m->save_content('temp.ps');
last VALID_LOOP;
}
- print STDERR "Failure to download content, waiting 180 seconds\n";
+ $sleep = 240+int(rand*120);
+ print STDERR "Failure to download content, waiting $sleep seconds\n";
$m = $state;
- } while (sleep 180);
+ } while (sleep $sleep);
}
system('gzip','temp.ps');
system("$ENV{HOME}/bin/sgf_rename",'temp.sgf');