X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=get_sgf;h=f978b81ed5c4a1321158bb88df40a98b58e37ab1;hb=3d5241a316e3ff729b19b878b0841558120f75e9;hp=0ce9a6ede2c9b06c61f5287bd35636decc7d2021;hpb=62f6d609f229925b70858abbb93b19a304407da9;p=bin.git

diff --git a/get_sgf b/get_sgf
index 0ce9a6e..f978b81 100755
--- a/get_sgf
+++ b/get_sgf
@@ -123,6 +123,7 @@ for my $url (@ARGV) {
      $m->get("http://gobase.org$fname");
      $m->save_content('temp.sgf');
      $m->get($uri->as_string);
+     $m->follow_link(text_regex=>qr/PostScript/);
      $m->form_number(2);
      $m->select('scale',$options{scale});
      $m->field('fig',$options{figures});
@@ -139,7 +140,7 @@ for my $url (@ARGV) {
 		    $m->save_content('temp.ps');
 		    last VALID_LOOP;
 	       }
-	       $sleep = 240+int(rand*120);
+	       $sleep = 240+int(rand()*120);
 	       print STDERR "Failure to download content, waiting $sleep seconds\n";
 	       $m = $state;
 	  } while (sleep $sleep);